Add plots 1-4 and R scripts to generate plots