R code to generate Figure.3
Figure 3 created by plot3.R