plot4.R

this file can just be sourced, for e.g, source("plot4.R") and after this you can find the plot4.png in your working directory.