## Not run:
# mat <- rbind(dfm(c("b A A", "C C a b B"), toLower = FALSE, verbose = FALSE),
# dfm("A C C C C C", toLower = FALSE, verbose = FALSE))
# colnames(mat) <- toLower(featnames(mat))
# mat
# compress(mat, margin = "documents")
# compress(mat, margin = "features")
# compress(mat)
#
# # no effect if no compression needed
# compress(dfm(data_char_inaugural, verbose = FALSE))
# ## End(Not run)
Run the code above in your browser using DataLab