Course Project R file

uploading Jul 22