add plot1

add plot1 R script and PNG file