add Clean_Data.r plot1-4.R and plot1-4.png