Как использовать plot3D :: persp3D (), чтобы увидеть plot в устройстве rgl как с rgl :: persp3d ()?

Question

Я бы хотел построить свою трехмерную функцию в окне устройства rgl, используя пакет plot3D. Это позволяет мне вращаться по осям X, Y, Z и масштаб. Это базовый пример с пакетом rgl:

x <- seq(-10, 10, length = 30)
y <- x
z <- outer(x, y, function(x, y) { r <- sqrt(x^2 + y^2); 10 * sin(r)/r })
z[is.na(z)] <- 1
rgl::persp3d(x, y, z)

К сожалению, это не открыто в устройстве rgl:

plot3D::persp3D(x, y, z)

Я почти уверен, что видел его где-то (возможно, даже в моих экспериментах с этим пакетом). Может кто-то помочь мне, пожалуйста?

Answer 1

tl; др может быть, вы искали пакет plot3Drgl?

Я не думаю, что это возможно. ?plot3D::persp3D говорит

‘persp3D’ является расширением стандартного графика persp

(выделение добавлено). «График по умолчанию persp» построен на основе базовой графики R, которая использует статическую модель в стиле «холст» - ее нельзя динамически поворачивать / увеличивать.

Давайте попробуем поискать другие пакеты с «3D» в названии ...

a1 <- available.packages()
grep("3D",rownames(a1),value=TRUE)
## [1] "arf3DS4"         "BaTFLED3D"       "DGVM3D"          "FPCA3D"         
## [5] "plot3D"          "plot3Drgl"       "VecStatGraphs3D"

Мы можем попробовать plot3Drgl, чья документация (?plot3Drgl) гласит

Он будет отображать большинство (но не все) объекты из графиков, созданных с помощью ‘Plot3D’, за исключением цветовых клавиш и полигонов.

С другой стороны, из экспериментов видно, что обрабатывает цветовые клавиши ...

plot3Drgl::persp3Drgl(x,y,z)