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

Question

最近版本的rgl包R（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“结果SA截图我得到：

Answer 1

不要使用shinyRGL 。它尚未更新很久。 rgl本身现在包含完整的Shiny支持。见例子的目录

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

和

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