Create gReenstRoplotter.R

plot associations of prompting word for each year