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)

Arguments

frames

list of ggplot2 objects, crated with frames_spatial.

labels

character, text to be added to frames. Either a single character value or a character vector of same length as frames.

x

numeric, position of text on the x scale. Either a single numeric value or a numeric vector of same length as frames.

y

numeric, position of text on the y scale. Either a single numeric value or a numeric vector of same length as frames.

colour

character, the text colour(s). Either a single character value or a character vector of same length as frames.

size

numeric, the text size(s). Either a single numeric value or a numeric vector of same length as frames.

type

character, either "text" to draw text or "label" to draw text inside a box.

verbose

logical, if TRUE, messages and progress information are displayed on the console (default).

Value

List of frames.

See also

Examples

library(moveVis)
library(move)

data("move_data", "basemap_data")
m <- align_move(move_data, res = 4, unit = "mins")

# create spatial frames using a custom NDVI base layer
r_list <- basemap_data[[1]]
r_times <- basemap_data[[2]]

# \donttest{
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]]
# }