if (FALSE) {
quanteda:::msg("you cannot delete %s",
c("a document", "documents"), indices = TRUE)
quanteda:::msg("tokens has %s",
c("sentences", "paragraphs", "documents"), indices = 2)
dfmat <- data_dfm_lbgexample
quanteda:::msg("dfm has %d %s and %d %s",
list(ndoc(dfmat), c("document", "documents"),
nfeat(dfmat), c("feature", "features")),
list(1, ndoc(dfmat) > 1,
1, nfeat(dfmat) > 1))
}
Run the code above in your browser using DataLab