Create plot4.R

This file creates plot4.png