将语料库和向量写入R中的csv文件

Question

dat <- read.csv("file.csv",header=F)$V2
doc.corpus <- Corpus(VectorSource(dat))
....
doc.corpus <- tm_map(doc.corpus, stripWhitespace)
sent <- ""
for(i in 2:length(doc.corpus)){
    sent[i] <- get_sentiment(get_sentences(as.character(doc.corpus[i])))
}
sent[1] = "sentiment"

我必须把情绪和doc.corpus写成一个csv文件作为R中的两列。如果它刚刚被发送，我会做像write.csv（sent，file =“MyData.csv”）这样的事情。但是我应该如何将语料库写入csv文件。

Answer 1

dataframe＆lt; - data.frame（text = sapply（doc.corpus，identity），stringsAsFactors = F）