powered by
ellipse(x, y, covmat, alpha = 0.05)
x = 99; y = 101; covmat <- matrix(c(1,0.9,0.9,1),nrow=2) ell <- ellipse(x,y,covmat) plot(c(90,110),c(90,110),type='l') polygon(ell,col=rgb(0,1,0,0.5)) points(x,y,pch=21,bg='black')
Run the code above in your browser using DataLab