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

Question

使用最新版本的R（3.3.1，Windows 10）rgl软件包，我可以在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")