Initial Project 1 submission

Four R scripts and four plot files.