Modify plot1.R and download.R to return text file