Fixed plot2.R and started plot3.R