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