Course Project 1

R scripts