corp <- tmCorpus(c("This is corp", "Document 2"))
parsed <- parse(corp)
parsed_ngram <- ngram(corp, k = 2)
parsed <- tmParsed(list(c("This", "is", "corp"), c("Document", "2")))
## 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