I\'m having an issue with stemCompletion. Here is a reproducible example.
library("tm") library("SnowballC") text <- "communicate. com