我想使用R Studio基于传单地图创建动画地图。以前这是与ggmaps& ggplot使用saveHTML,但函数saveHTML无法制作传单地图的图像,因此无法制作显示动画地图的html页面。
有关如何将传单地图另存为图像,或如何使用saveHTML获取动画地图的任何建议?
数据如下:
long = c(-73.95,-74,-74.05)
lat = c(40.8, 40.7, 40.4)
minute = c(15, 0, 18)
tripData <- data.frame(long,lat,minute)
到目前为止代码:
library(animation)
library(leaflet)
plotLeaflet <- function(.minute){
df = subset(tripData, minute == .minute);
(m2 <- m %>% addCircles(data = df));
print(m2);
}
# Create animation
range_m = 0:59
oopt <- animation::ani.options(interval = 0.1)
FUN3 <- function() {
mapply(function(x) {
plotLeaflet(x);
animation::ani.pause()
},range_m)
}
saveHTML(FUN3(), autoplay = FALSE, loop = FALSE, verbose = FALSE, outdir = "images/animate/new",
single.opts = "'controls': ['first', 'previous', 'play', 'next', 'last', 'loop', 'speed'], 'delayMin': 0")
帮助将受到高度赞赏!