Last chance! 50% off unlimited learning
Sale ends in
Add a scalebar to a plot
sbar(d, xy=NULL, type="line", divs=2, below="",
lonlat=NULL, label, adj=c(0.5, -1), lwd=2, xpd=TRUE, ...)
numeric. Distance covered by the scalebar. In the units of the coordinates of the plot, and in km for angular (longitude/latitude) data; see lonlat
x and y coordinate to place the plot. Can be NULL. Use xy=click()
to make this interactive
"line" or "bar"
number of divisions for a bar: 2 or 4
character. Text to go below scalebar (e.g., "kilometers")
logical or NULL. If logical, TRUE
indicates if the plot is using longitude/latitude coordinates. If NULL
this is guessed from the plot's coordinates
adjustment for text placement
vector of three numbers to label the scale bar (beginning, midpoint, end)
line width for the "line" type scalebar
logical. If TRUE
, the scalebar can be (partly) outside the plot area
graphical arguments to be passed to other methods
none
# NOT RUN {
f <- system.file("ex/meuse.tif", package="terra")
r <- rast(f)
plot(r)
sbar(1000)
sbar(1000, xy=c(178500, 333500), type="bar", divs=4, cex=.8)
f <- system.file("ex/elev.tif", package="terra")
r <- rast(f)
plot(r, type="interval")
sbar(20, c(6.2, 50.1), type="bar", cex=.8, divs=4)
sbar(15, c(6.3, 50), type="bar", below="km", label=c(0,7.5,15), cex=.8)
sbar(15, c(6.65, 49.9), cex=.8, label=c(0,"km",15))
sbar(15, c(6.65, 49.8), cex=.8, label="15 kilometer", lwd=5)
sbar(15, c(6.65, 49.7), divs=4, cex=.8, below="km")
# }
Run the code above in your browser using DataLab