我正在尝试绘制多变量函数。但是,出于某种原因,无论我使用哪种颜色,函数总是以黑色绘制......似乎col =“lightgreen”参数不起作用。任何人都有线索为什么?
# Define Sequences for Multivariate Function
xf3x1 <- seq(-100, 100, length=500)
xf3x2 <- seq(-100, 100, length=500)
# Outer Calculates the Cartesian Product
z <- outer(xf3x1,xf3x2,function(xf3x1,xf3x2) xf3x1*xf3x2)
persp(xf3x1,xf3x2,z,col="lightgreen",theta=30,phi=20, main="Problème 3: Function 3")
答案 0 :(得分:3)
这里发生的事情是,你在一个小区域内有很多方面,小平面本身很小,小平面边框(黑色)太厚,导致填充颜色不显示。如果指定border = NA
,曲面将以填充颜色显示。
# Define Sequences for Multivariate Function
xf3x1 <- seq(-100, 100, length=500)
xf3x2 <- seq(-100, 100, length=500)
# Outer Calculates the Cartesian Product
z <- outer(xf3x1,xf3x2,function(xf3x1,xf3x2) xf3x1*xf3x2)
persp(xf3x1,xf3x2,z,col="lightgreen", border = NA, theta=30,phi=20,
main="Problème 3: Function 3")
给