r-在带有传单的数据帧列表中绘制多边形

r-在带有传单的数据帧列表中绘制多边形,r,leaflet,polygon,spatial,geo,R,Leaflet,Polygon,Spatial,Geo,我有一个包含88个多边形的列表,其中每个多边形都只是一个数据帧,有一个lat列和一个长列,有没有简单的方法在传单中绘制这些多边形? 例如,mi数据采用变量示例的格式,如下所示 df1 <- data.frame(lon=c(-71.53700 -71.51676 -71.51682 -71.51524 -71.53921 -71.53700), lat=c(-32.94082, -32.93327, -32.93325, -32.92814, -32.93408, -32.94082))

我有一个包含88个多边形的列表,其中每个多边形都只是一个数据帧,有一个lat列和一个长列,有没有简单的方法在传单中绘制这些多边形? 例如,mi数据采用变量示例的格式,如下所示

df1 <- data.frame(lon=c(-71.53700 -71.51676 -71.51682 -71.51524 -71.53921 -71.53700), lat=c(-32.94082, -32.93327, -32.93325, -32.92814, -32.93408, -32.94082)) 
df2 <- data.frame(lon=c(-72.11527, -72.09601, -72.08983, -72.10905, -72.11527), lat=c(-36.61267, -36.61720, -36.60192, -36.59682, -36.61267))
example <- list(df1, df2)

df1下面是一个通过
sf
将点转换为多边形的示例。请注意,第一个多边形基本上是一条直线,所以我只绘制了第二个多边形。

库(tidyverse)
图书馆(sf)
图书馆(单张)
df1%
总结(几何=联合收割机(几何))%>%
st_cast(“多边形”)
传单(多糖[2,])%>%
addPolygons()

添加一个可复制的示例会很有用,但您可以使用
sf
来实现这一点。转换为点<代码>总结
结合要点,
st_cast
对Polygone进行编辑,包括一个示例!谢谢我将尝试你发布的内容:)