add plot3
add R code for plot3