Create plot1.R

Reads the data and plots the first graph