Initial commit

Added plot1.R