我正在尝试从纬度坐标的数据框中绘制路径。可以找到数据here。这是我用于绘制路径的代码:
library(sf)
library(mapdeck)
library(tidyverse)
df1 <- df %>% st_as_sf(coords = c("lon", "lat")) %>%
group_by(imoNumber) %>%summarise(m=mean(imoNumber, na.rm = TRUE)) %>% st_cast("LINESTRING")
mapdeck(token = key, style = mapdeck_style("outdoors")) %>%
add_path(data = df1)
这将像这样绘制数据:
是否有添加箭头以显示路径方向的方法?类似于传单中的折线装饰器吗?所需的结果是这样的: