我正在与大面积的珊瑚礁一起工作,并试图快速将它们可视化,以便我可以选择一个较小的子集来开始工作。为此,我获取了我的空间点,将它们转换为 LineString 以加快映射速度,然后使用 mapview 显示它们。我的代码如下:
data_as_sf %>%
filter(reef_name %in% subgroup) %>%
group_by(.dots=c("reef_name", "reef_section")) %>%
summarize() %>%
st_cast("LINESTRING") %>%
mapview()
如果有人可以提供建议,以便我可以
- 使线条更大/更厚,以便在缩小时更容易看到,并且
- 用因子“reef_name”着色的线条
这真的很有帮助。