我想使用persp函数绘制一个不连续的曲面。下面是函数: f <- function(x, y) r <- sqrt(x^2 + y^2) ok <- r >= 1 return(out)
} 为了在规则网格上获得函数的透视图,我使用 x <- y <- seq(-4, 4, length.out = 50)
第一个图是一个二进制类数据的简单表示。第二个二维图,我们看到点周围的红圈和黑圈。红色表示源数据集,黑色表示目标数据集。如何创建X1,X2,P(Y)的曲面图?"Z‘坐标是实例的P( Y )。基本上,我希望这些点在曲面图中创建峰值。我尝试了surf和mesh,但是我没有正确地这样做,因为Z必须是X和Y的函数。如果您建议在R或Python中制作这样的图,请随意这样做。我希望结果类似于图3。图1图2