summary(guess.lang("/home/user/data/some.txt", udhr.path="/home/user/data/udhr_txt/"))
summary(flesch(tagged.txt))
tagged.results <- treetag("~/my.data/sample_text.txt", treetagger="manual", lang="en",
TT.options=list(path="~/bin/treetagger", preset="en"))
summary(tagged.results)
summary(lex.div(tagged.txt))
summary(freq.analysis(tagged.txt))
Run the code above in your browser using DataLab