R 如何将存储在数据帧中的geojson字符串直接转换为sp？

我得到了一个数据帧（dat），其中有一个名为“geometry”的列，其中包含geojson点，例如

{“type”：“point”，“coordinates”：[100.1234,10.1234]}

我目前正在使用以下代码，它可以正常工作

library(sp)
library(sf)
dat$geometry<-do.call(rbind, lapply(as.character(dat$geometry), read_sf))
dat$geometry<-as(dat$geometry, "Spatial")

库（sp）
图书馆（sf）
dat$geometryI想问一下，既然你已经有了一个
sf
？@SYMBOLXAU，为什么你想要一个
sp
对象，我想传单只与sf兼容。我刚刚意识到它也适用于sf。谢谢你的提问。