Stemming function corrected

Needed to lapply() wordStem, not to run this on a list (which
incorrectly coerced the input list to a character vector).

Also changed the return class from wfm to data.frame when
stopwords=TRUE.