## Warning in file(con, "r"): file("") は、open = "w+" と open = "w+b" だけを
## サポートします: 前者を使います
You must enable Javascript to view this page properly.
You must enable Javascript to view this page properly.
You must enable Javascript to view this page properly.
You must enable Javascript to view this page properly.
You must enable Javascript to view this page properly.
x <- y <- seq(-3,3,length.out=100)
xy <- as.matrix(expand.grid(x, y))
z <- mvtnorm::dmvnorm(xy)
persp3d(x, y, z, col = "gray")