Peer Asessments 1 - add plot(1-4).R files to construct plots