Add plot4.R
Add plot4.png