如何使用闪亮的 rgl 删除不需要的文本输出

Question

使用 R 的最新版本 rgl 包（3.3.1，Windows 10），我可以在 Shiny 应用程序中创建交互式 3D 绘图。但是，我也得到冗长的不需要的文本输出。

如何抑制此输出？

以下是导致不需要的文本输出的闪亮应用示例的代码：

library(shiny) # 0.13.2
library(rgl) # 0.1.0
library(shinyRGL) #0.96.0

aShinyList = list(  
    ui      =   webGLOutput("myWebGL"),
    server  = function(input,output, session)(  output$myWebGL <-    renderWebGL({
    points3d(1:10, 1:10, 1:10)
    axes3d()
  }))
)

runApp(aShinyList)

Here是我得到的结果的截图：

Answer 1

不要使用 shinyRGL。已经很久没有更新了。 rgl 本身现在包含完整的 Shiny 支持。请参阅目录中的示例

system.file("shinySimple", package = "rgl")

和

system.file("shinyDemo", package = "rgl")

如何使用闪亮的 rgl 删除不需要的文本输出

How to remove unwanted text output with shiny rgl

r

rgl

shiny