Add a PolySet to an Existing Plot as Polylines
Add a PolySet to an existing plot, where each unique (PID
, SID
) describes a polyline.
addLines (polys, xlim = NULL, ylim = NULL, polyProps = NULL, lty = NULL, col = NULL, arrows = FALSE, ...)
polys
: PolySet to add (required).xlim
: range of X-coordinates.ylim
: range of Y-coordinates.polyProps
: PolyData specifying which polylines to plot and their properties. par
parameters passed as direct arguments supersede these data.lty
: vector of line types (cycled by PID
).col
: vector of colours (cycled by PID
).arrows
: Boolean value; if TRUE
, add arrows using the arrows function and consider the arguments angle
, length
, and code
....
: additional par
parameters for the lines
function.The plotting routine does not connect the last vertex of each discrete polyline to the first vertex of that polyline. It clips polys
to xlim
and ylim
before plotting.
For additional help on the arguments lty
and col
, please see par
.
PolyData consisting of the PolyProp
s used to create the plot.
Nicholas M. Boers, Staff Software Engineer
Jobber, Edmonton AB
Last modified Rd: 2013-04-10
calcLength
, clipLines
, closePolys
, convLP
, fixBound
, fixPOS
, locatePolys
, plotLines
, thinPolys
, thickenPolys
.
local(envir=.PBSmapEnv,expr={ oldpar = par(no.readonly=TRUE) #--- create a PolySet to plot polys <- data.frame(PID=rep(1,4),POS=1:4,X=c(0,1,1,0),Y=c(0,0,1,1)) polys <- as.PolySet(polys, projection=1) #--- plot the PolySet plotLines(polys, xlim=c(-.5,1.5), ylim=c(-.5,1.5), projection=1) #--- add the PolySet to the plot (in a different style) addLines(polys, lwd=5, col=3) par(oldpar) })
Useful links