如何在编写R .csv文件时控制双引号

时间:2013-11-26 13:44:07

标签: r csv

我的情况是我正在尝试将包含具有不同数据类型的列的数据帧写入R中的csv文件。我用来编写该文件的代码是:

filename = file("equipment.csv")
write.csv(file = filename, x = equipment, quote = FALSE, row.names = FALSE ) 

当我尝试将csv文件加载到SQL数据库中时,这会导致问题,因为某些列包含包含“,”的字符串。如果我在上面的代码中设置了quote = TRUE,那么当我加载到数据库时,它会为我的数字数据类型带来问题。

我的问题:有没有办法控制R在编写csv文件时为列添加引号的方式?我希望能够在字符串周围添加引号,但不能添加其他数据类型。

非常感谢你的帮助。

1 个答案:

答案 0 :(得分:11)

指定您想要引用的列

write.csv(file = filename, x = equipment, quote = c(2,3), row.names = FALSE )

PS:如果你想自动计算出哪些列可以单独留下,你可以这样做:

non_numerics<-adply(1:ncol(equipment),1,function(x)print(is.numeric(equipment[,x])))
quote_val<-as.numeric(array(non_numerics[which(!non_numerics$V1),1]))

filename = file("equipment.csv")
write.csv(file = filename, x = equipment, quote = quote_val, row.names = FALSE )