在R中，如何在主题模型中编写数据功能？

Question

今天，我学习了R中的主题模型。第一个问题是如何加载下面的数据集。我发现R中有一些内置数据集。但是如何在R中保存一个新建数据集，这样我就可以使用它，因为我可以使用其他原始数据集，例如。...如何在数据中写入adtm（ ）在以下几行中？以及如何保存adtm，以便下次可以像原油一样使用它？ 非常感谢你。你能帮我吗？

library(tm)
library(topicmodels)
setwd('F://_topic//economist//use//articledir') 
adataset  <-Corpus(DirSource("F://_topic//economist//use//articledir"), readerControl = list(language="lat")) 
adataset <- tm_map(adataset, removeNumbers)
adataset <- tm_map(adataset, removePunctuation)
adataset <- tm_map(adataset , stripWhitespace)
adataset <- tm_map(adataset, tolower)
adataset <- tm_map(adataset, removeWords, stopwords("english")) 
adtm <-DocumentTermMatrix(adataset) 
adtm <- removeSparseTerms(adtm, 0.75)

data(adtm, package = "topicmodels")
# error, no adtm dataset, how to write here.
best.model  <- lapply..