Updated plot1.R with code to directly load source data from web.