由R中的方程给出的绘制曲线

Leo*_*Leo 10 graphics r

在R中,有没有办法绘制由方程给出的2D曲线?例如,如何绘制由方程x ^ 2 - 3*y ^ 2 + 2*x*y - 20 = 0?给出的双曲线?

Vin*_*ynd 17

您可以使用contour绘制双曲线的两个分支.

f <- function(x,y) x^2 - 3*y^2 + 2*x*y - 20
x <- y <- seq(-10,10,length=100)
z <- outer(x,y,f)
contour(
  x=x, y=x, z=z, 
  levels=0, las=1, drawlabels=FALSE, lwd=3
)
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述

  • `emdbook`包中的`curve3d`给出了一个小捷径:`emdbook :: curve3d(x ^ 2 - 3*y ^ 2 + 2*x*y - 20,xlim = c(-10,10),ylim = c(-10,10),n = c(100,100),+ sys3d ="contour",levels = 0)` (3认同)