vwline (version 0.2-4)

outline: Calculate outline

Description

Calculate outline of a variable-width line, possibly without simplication.

Usage

outline(x, simplify=TRUE, ...)
# S3 method for vwlineGrob
outline(x, simplify=TRUE, ...) 
# S3 method for offsetXsplineGrob
outline(x, simplify=TRUE, ...) 
# S3 method for offsetBezierGrob
outline(x, simplify=TRUE, ...)

Value

A list with components x and y

describing the complete outline of the variable-width line (possibly unsimplified).

Arguments

x

A variable-width line grob.

simplify

Whether to simplify the outline (using polyclip::polysimplify to collapse self-intersections).

...

Possible additional arguments for methods.

Author

Paul Murrell

See Also

grid.vwline, grid.offsetXspline grid.offsetBezier

Examples

grid.newpage()
x <- c(.2, .8, .8, .2)
y <- c(.2, .8, .2, .8)
w <- c(0, .1, .1, 0)
vwlg <- vwlineGrob(x, y, w, gp=gpar(col="grey", lwd=10, fill=NA))
grid.draw(vwlg)
o <- outline(vwlg, simplify=FALSE)
grid.polygon(o$x, o$y, default.units="in")

grid.newpage()
oxsg <- offsetXsplineGrob(x, y, w, gp=gpar(col="grey", lwd=10, fill=NA))
grid.draw(oxsg)
o <- outline(oxsg, simplify=FALSE)
grid.polygon(o$x, o$y, default.units="in")