Last active
April 17, 2024 18:07
-
-
Save 16EAGLE/16f08531f925f9de2286af277089e3d1 to your computer and use it in GitHub Desktop.
Short moveVis example on how to display the full traces of each path using trace_show and trace_colour with frames_spatial()
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# use moveVis >= 0.10.2 for this example (does not work with CRAN version 0.10.1) | |
# remotes::install_github("16eagle/moveVis") | |
library(magrittr) | |
library(move) | |
library(moveVis) | |
data("move_data") | |
m <- align_move(move_data, res = 4, unit = "mins") | |
frames <- frames_spatial(m, map_service = "mapbox", map_type = "satellite", map_token = "YOUR_MAPBOX_TOKEN", | |
path_colours = c("red", "green", "blue"), tail_colour = "white", tail_size = 0.8, | |
trace_show = T, trace_colour = "white", equidistant = F) %>% | |
add_labels(x = "Longitude", y = "Latitude") %>% | |
add_northarrow(colour = "white") %>% | |
add_scalebar(colour = "white") %>% | |
add_timestamps(m, type = "label") %>% | |
add_progress() | |
animate_frames(frames, out_file = "/full/path/to/file/moveVis_with_trace.gif", | |
width = 800, height = 550, res = 95, | |
overwrite = T) |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
I'm also hoping to allow the traces to maintain the same color as the associated path, and ideally reduce the alpha. Any idea how to do this?