Added R program to generate plot 4 for assignment 1