Create Plot1.R

Plotting the First Plot