Places a scale bar on the map in 3D.
render_scalebar(
limits,
position = "W",
y = NULL,
segments = 10,
scale_length = 1,
label_unit = "",
offset = NULL,
radius = NULL,
color_first = "darkred",
color_second = "grey80",
color_text = "black",
text_switch_side = FALSE,
text_x_offset = 0,
text_y_offset = 0,
text_z_offset = 0,
clear_scalebar = FALSE
)The distance represented by the scale bar. If a numeric vector greater than length 1, this will specify the breaks along the scale bar to place labels, with the maximum value in limits assumed to be the last label. Must be non-negative.
Default `W`. A string representing a direction. Can be `N`, `E`, `S`, and `W`.
Default `NULL`. The height of the scale bar, automatically calculated if `NULL`.
Default `10`. Number of colored segments in the scalebar.
Default `1`. Length of the scale bar, relative to the side of the map specified in `position`. If a length-2 vector, the first number specifies the start and stop points along the side.
Default `NULL`. The distance unit for the label.
Default `NULL`. The distance away from the edge to place the scale bar. If `NULL`, automatically calculated.
Default `NULL`. The radius of the cylinder representing the scale bar. If `NULL`, automatically calculated.
Default `darkred`. Primary color in the scale bar.
Default `grey90`. Seconary color in the scale bar.
Default `black`. Color of the text.
Default `FALSE`. Switches the order of the text.
Default `0`. Distance offset for text in the x direction.
Default `0`. Distance offset for text in the y direction.
Default `0`. Distance offset for text in the z direction.
Default `FALSE`. Clears the scale bar(s) on the map.
Displays snapshot of current rgl plot (or saves to disk).
#Add a scale bar to the montereybay dataset, here representing about 80km
if(run_documentation()) {
montereybay %>%
sphere_shade() %>%
plot_3d(montereybay,theta=45, water=TRUE)
render_scalebar(limits=c(0, 80), label_unit = "km")
render_snapshot()
}
#> `montereybay` dataset used with no zscale--setting `zscale=50`. For a realistic depiction, raise `zscale` to 200.
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#This function works with `render_highquality()`
render_highquality(lightdirection = 250, lightaltitude = 40,
scale_text_size = 24, clamp_value = 10,
sample_method = "sobol_blue", samples = 128)
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#We can change the position by specifying a cardinal direction to `position`, and the
#color by setting `color_first` and `color_second`
render_scalebar(limits=c(0,80), label_unit = "km", position = "N",
color_first = "darkgreen", color_second = "lightgreen")
render_snapshot()
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#And switch the orientation by setting `text_switch_side = TRUE`
render_scalebar(limits=c(0,80), label_unit = "km", position = "N", text_switch_side = TRUE,
color_first = "darkgreen", color_second = "lightgreen")
render_snapshot()
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#We can add additional breaks by specifying additional distances in `limits`
render_scalebar(limits=c(0,40,80), label_unit = "km")
render_snapshot()
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#We can also manually specify the height by setting the `y` argument:
render_scalebar(limits=c(0,40,80), y=-70, label_unit = "km")
render_snapshot()
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#Here we change the total size by specifying a start and end point along the side,
#and set the number of colored `segments`:
render_scalebar(limits=c(0,20, 40), segments = 4, scale_length = c(0.5,1), label_unit = "km")
render_scalebar(limits=c(0,20, 40), segments = 4, position = "N", text_switch_side = TRUE,
scale_length = c(0.25,0.75), label_unit = "km")
render_snapshot()
render_scalebar(clear_scalebar = TRUE)
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456
if(run_documentation()) {
#Change the radius of the scale bar with `radius`. Here, the autopositioning doesn't work well with
#the labels, so we provide additional offsets with `text_y_offset` and `text_x_offset` to fix it.
render_scalebar(limits=c(0,20, 40), segments = 4, scale_length = c(0.5,1),
label_unit = "km", radius=10,text_y_offset=-20,text_x_offset=20)
render_snapshot()
}
#> Error: R: NonconformingDrawingPrimitiveDefinition `text' @ error/draw.c/RenderMVGContent/4456