Code for "plot1.R" and png figure added.