1. finish plot4.R

2. include plot4.png