Pushing R code for plots