Create plot4.R

# Script called plot4.R for the Exploratory Data Analysis Course Project 1.