如何在R中编写带有非标准引号字符的CSV？

Question

我有一个包含文本字段的数据框。该文字中包含引号，因此我想将@用作引号字符，而不是"或'。

write.table和write.csv函数不允许使用其他引号字符。

是否有其他功能可以让我使用不同的引号字符？

Answer 1

作为一种变通方法，您可以禁用引用，然后将字符串换成@个字符。

df[] <- lapply(df, function(x) {
    if(is.character(x) || is.factor(x))
        x <- sprintf("@%s@", x)
    x
})
write.csv(df, "file.csv", quote=FALSE, row.names=FALSE)

（当我们在它时，关闭行名称，因为它们只是搞乱了。）