
Last chance! 50% off unlimited learning
Sale ends in
topic_network(k, model)
## Not run:
# x <- tmCorpus(rep("as, a , a ,s l k l l k k j h g f f hg j aaa", 100))
# require(rJava)
# model <- suppressMessages(train(x))
# table_topic <- topic_table(model)
# network <- topic_network(10 ,table_topic$words)
# ## End(Not run)
Run the code above in your browser using DataLab