added plot3.R and corrections
corrections