corp <- tmCorpus(c("This is first document", "This is second"))
getMeta(corp, parameter = "language", 1)
getMeta(corp, "title", 2)
meta(corp, "title")
text <- tmTextDocument("Text document")
getMeta(text, "language")
meta(text, "title")
parsed <- tmParsed(list(c("Parsed", "doc", "one"), c("Parsed", "two")))
getMeta(parsed, parameter = "title", 2)
meta(parsed, "title")
Run the code above in your browser using DataLab