st_write拒绝在R

编程问答 2022-06-15

问题描述

在R中使用sf软件包，我正在读取.shp文件并导出数据.csv文件。我的问题是字符导出时不带引号。

library(sf)
library(dplyr)

nc <- st_read(system.file("shape/nc.shp",package="sf"))
nc <- head(nc)
nc$NAME_text <- as.character(nc$NAME)
nc <- nc %>% select(AREA,NAME,NAME_text,FIPS,CRESS_ID)
str(nc)
st_write(nc,"test.csv")

NAME（因子）和NAME_text（字符）列包含控制台中的引号（str（nc））。

Classes ‘sf’ and 'data.frame':  6 obs. of  6 variables:
 $ AREA     : num  0.114 0.061 0.143 0.07 0.153 0.097
 $ NAME     : Factor w/ 100 levels "Alamance","Alexander",..: 5 3 86 27 66 46
 $ NAME_text: chr  "Ashe" "Alleghany" "Surry" "Currituck" ...
 $ FIPS     : Factor w/ 100 levels "37001","37003",..: 5 3 86 27 66 46
 $ CRESS_ID : int  5 3 86 27 66 46
 $ geometry :sfc_MULTIpolyGON of length 6; first list element: List of 1

但是，在导出的.csv文件中，“ NAME_text”列中的字符没有引号。我在这里想念什么？

AREA,CRESS_ID
0.114,Ashe,"37009","5"
0.061,Alleghany,"37005","3"
0.143,Surry,"37171","86"
0.07,Currituck,"37053","27"
0.153,northampton,"37131","66"
0.097,Hertford,"37091","46"

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

charactercharactercharactercsvcsvcsvrrsf