Update plot4.R to add legend for the 3rd subgraph of plot4.png