如何访问语料库的元素并写入R中的文件？

Question

我正在处理R中的vcorpus，如下所示：

我打电话给内容 - ＆gt;内容然后内容 - > meta-＆gt;每个单独文档的ID。我只想写内容 - ＆gt;内容和内容 - ＆gt; meta-＆gt; id稍后将为每个文档分隔文本文件。

Answer 1

创建一个函数来提取所需的元素，然后将其应用到语料库中。

这样的事情：

extractContentID <- function(x) {
  out <- list()
  out$content <- x$content
  out$id <- x$meta$id
  return(out)
}

newFiles <- sapply(Doc, extractContentID)