add_text.Rd
This function adds static or dynamically changing text to the animation frames created with frames_spatial
.
add_text(
frames,
labels,
x,
y,
colour = "black",
size = 3,
type = "text",
verbose = TRUE
)
an object of class moveVis
created with frames_spatial
.
character, text to be added to frames. Either a single character value or a character vector of same length as frames
.
numeric, position of text on the x scale. Either a single numeric value or a numeric vector of same length as frames
.
numeric, position of text on the y scale. Either a single numeric value or a numeric vector of same length as frames
.
character, the text colour(s). Either a single character value or a character vector of same length as frames
.
numeric, the text size(s). Either a single numeric value or a numeric vector of same length as frames
.
character, either "text"
to draw text or "label"
to draw text inside a box.
logical, if TRUE
, messages and progress information are displayed on the console (default).
A frames object of class moveVis
.
library(moveVis)
library(move)
data("move_data", "basemap_data")
m <- align_move(move_data, res = 4, unit = "mins")
#> Temporal resolution of 4 [mins] is used to align trajectories.
# create spatial frames using a custom NDVI base layer
r_list <- basemap_data[[1]]
r_times <- basemap_data[[2]]
if (FALSE) {
frames <- frames_spatial(m, r_list = r_list, r_times = r_times, r_type = "gradient",
fade_raster = TRUE)
# add text somewhere to all frames:
frames.a <- add_text(frames, "Water area", x = 8.959, y = 47.7305,
colour = "white", size = 3)
frames.a[[100]]
# or use the ggplot2 "label" type:
frames.b <- add_text(frames, "Water area", x = 8.959, y = 47.7305,
colour = "black", size = 3, type = "label")
frames.b[[100]]
}