googleVis（gvisTable）未在 R 上使用闪亮仪表板应用程序呈现答案

【问题标题】：googleVis (gvisTable) not rendering with shinydashboard app on RgoogleVis（gvisTable）未在 R 上使用闪亮仪表板应用程序呈现
【发布时间】：2016-03-14 14:18:08
【问题描述】：

我目前正在使用 shinydashboard 和 googleVis 构建应用程序。在我看来，gvisTable 是展示我的输出的最佳方式。我的问题如下：

该应用程序（因此，googleVis）与我计算机上的 R 浏览器完美配合，但是如果我想在另一台计算机上显示该应用程序，该应用程序将启动并计算所有询问但是表格没有使用 gvisTable 呈现。由于它可以在我的计算机上运行，我认为问题不在于代码，但我向您展示了使用的包以及我如何使用 gvisTable 的示例。

我使用以下软件包：

library(shiny)
library(shinydashboard)
library(shinyBS)
library(shinyjs)
library(texreg)
library(googleVis)

在文件 server.R 中，当我想输出一个表时，我使用类似的代码

output$coefftable <- renderGvis({
    ConfInv <- 0.05
    model <- Arima_Model()
    CoeffTable <- CoefficientsFunction(ConfInv,model)
    gvisTable(CoeffTable,options(digits=4))
  })

函数 CoefficientsFunction 使用 data.frame 返回一个表。

对于输出，我在ui.R中使用

htmlOutput("coefftable")

我不明白问题出在哪里，它可能来自gvisTables not rendering in Shiny apps 中建议的 RStudio 浏览器。你认为我可以使用其他浏览器吗？如果是的话，哪一个是最好的？

【问题讨论】：

标签： r browser shiny googlevis

【解决方案1】：

尝试分配您的表，然后将其返回到 server.R 中，如下所示：

output$coefftable <- renderGvis({
ConfInv <- 0.05
model <- Arima_Model()
CoeffTable <- CoefficientsFunction(ConfInv,model)
table <- gvisTable(CoeffTable,options(digits=4))
return(table)
})

【讨论】：