在R中为NLP字符串的写功能

Question

这是我已经提出的问题的变体，但是我认为有一个皱纹值得一个单独的问题。我使用R来清洁一些文本文件。这些是字母，即字符弦。我正在使用NLP，因此这些是NLP字符串，而不是基本r字符串。简化版本看起来像这样：

library(NLP)
letter1 <- as.String(c("here is some text"))
letter2 <- as.String(c("and here is some more text"))
letter3 <- as.String(c("and this is the final one"))
list <- list(letter1 = letter1, letter2 = letter2, letter3 = letter3)

当我想导出这些文本文件时，就会发生问题。（我希望每个字母在单独的文本文件中，并在列表中的名称对应的文件的名称中。）给定早期问题中发布的解决方案，我使用以下内容：

for (i in 1:length(list)) {
write.csv(list[i], file=paste0("~/desktop/", names(list)[i]))
}

当我这样做时，我会收到一条错误消息，说cannot coerce class ""String"" to a data.frame。因此，我将它们转换为基础r字符串，如下：

list2 <- lapply(list, function(x){
x = toString(x)
x
})

这几乎有效。但是，输出看起来像这样（对于第一个）：

"","letter1"
"1","here is some text"

我只想要here is some text。我不想"", "letter1", or "1," or the quotation marks around这是一些文字。这可能吗？

Answer 1

我的示例必须与我自己的数据有所不同。对于我的数据，最简单的解决方案是使用cat()，尽管这对上述示例不起作用。我将在此处发布答案，但是如果它可以帮助任何人。我不确定我是否确定要编辑示例或像它那样保留示例，以反映实际历史记录。