Create plot4.R

This creates 4 different chart in the plot4.png file