corp <- tmCorpus(c("This is corp", "Document two is this"))
parsed <- parse(corp)
parsed_ngram <- ngram(corp, k = 2)
tabled <- make_tabled(parsed)
tabled_ngram <- make_tabled(parsed_ngram)
## Not run:
# corp <- tmCorpus("directory", package = "stylo")
# parsed <- parse(corp)
# parsed_ngram <- ngram(corp, k = 2)
# parsed <- tmParsed(source = "directory", package = "stylo")
# ## End(Not run)
Run the code above in your browser using DataLab