## Not run:
# library(rJava)
# x <- tmCorpus(lapply(1:100, function(x) paste(sample(LETTERS, 11),
# collapse = "")))
#
# model <- train(x)
# topic_wordcloud(model, topic_id = 2, k = 11)
# ## End(Not run)
Run the code above in your browser using DataLab