course project 1 R scripts and png files