Update wordcount_R_script.R