Как использовать grid3d для размещения трех сеток вдоль плоскостей xy, xz и yz?

Question

Я использую R и RGL. Я хотел бы добавить сетки вдоль плоскостей xy, xz и yz, проходя через начало координат, а не вдоль ограничительной рамки. Что-то вроде этого:

Я почти уверен, что мне нужен grid3d(), но я не знаю, какие аргументы использовать.

Answer 1

Используйте что-то вроде этого:

xyz <- matrix(rnorm(30), ncol = 3)
plot3d(xyz, axes = FALSE)
abclines3d(x = matrix(0, ncol=3), a = diag(3), col="black", lwd=3)
grid3d("x", at = list(x = 0), col = "blue")
grid3d("y", at = list(y = 0), col = "red")
grid3d("z", at = list(z = 0), col = "green")