inaugDfm <- dfm(inaugTexts, verbose = FALSE)
# first 50 features (in original text order)
head(features(inaugDfm), 50)
# first 50 features alphabetically
head(sort(features(inaugDfm)), 50)
# contrast with descending total frequency order from topfeatures()
names(topfeatures(inaugDfm, 50))
Run the code above in your browser using DataLab