Update R and .png files for plot4