Fixed plot1.R file