如何为此功能绘制3D图？

Question

有人可以帮我如何为输出在数组类中的该函数绘制图像或3D图吗？

AWS ECS

Answer 1

尝试一下，现在包括切片：

library(reshape2)

library(plot3D)


m = melt(mu.values)

par(mfrow = c(1,2))

scatter3D(x = m$Var1, y = m$Var2, z = m$Var3, colvar = m$value, pch = 16, cex = 0.1)

# contour slices

x <- y <- z <- 1:11

slicecont3D (x, y, z, ys = 1:11, colvar = mu.values, 
             theta = 60, border = "gray")

^{由reprex package（v0.3.0）于2020-07-08创建}