library(sf)
worldmap <- read_sf("../world.geo.json") %>%
st_transform(4490)
st_write(worldmap, "../world.shp", delete_layer = T)
说明:…表示工作目录是上一级目录
library(sf)
worldmap <- read_sf("../world.geo.json") %>%
st_transform(4490)
st_write(worldmap, "../world.shp", delete_layer = T)
说明:…表示工作目录是上一级目录