Updated R TempPlot scripts, still not working!