update:
Thanks for help. Check comments. Because of package version, I delete the tolower and it works. I just need to find another way to make it lower.
==
I had the same problem.
If you look at the arguments for stemDocuments you can specify the language of stemming. I found by specifying "English" it solved the problem for me.
stemDocuments
stemDocument(language="english")