相关疑难解决方法(0)

我想绘制x和y的隐式函数: 1 - 0.125 * y ^ 2 - x ^ 2 = 0.005 我知道它可以绘制为等高线图,但在下面的"外部"命令中有问题:

x<-seq(0.4,1.01,length=1000)
y<-seq(0,3,length=1000)
z<-outer(x,y,FUN="1-0.125*y^2-x^2=0.005")
contour(x,y,z,levels=0,drawpoints=FALSE)

我阅读了关于"外部"命令的常见问题解答(7.17)以及对函数进行矢量化的需要,但仍然处于一个quardry中.