# NOT RUN {
data("KDCorpus")
data("KDDTM")
mpaWords <- matrix.corpus.mpa(KDCorpus, fmin = 10, cmin = 1)
myKDSummary <- KDSummary(matrix.mpa = mpaWords, groupSize = 10)
myWordGroupDTM <- GroupDTM(dtm = KDDTM, kdSummary = myKDSummary)
# }
Run the code above in your browser using DataLab