adding 4 plots and 4 R scripts