if (require(polmineR.sampleCorpus) && require(rcqp)){
use("polmineR.sampleCorpus")
p <- partition("PLPRBTTXT", list(text_type="speech"))
a <- context(p, query="Integration", pAttribute="word")
}
Run the code above in your browser using DataLab