闪亮渲染googleVis HTML原始代码

Question

我使用googleVis生成图表对象（x），然后将其输出为：

cat(x$html$chart, file="y.html")

如何将这个原始的.html文件输入到Shiny server.R中，然后让它在ui上正确呈现？我找不到任何东西。我试过

y <- readLines("y.html") output$Plot = renderHTML(HTML(y))

和

shinyUI(fluidPage(
  titlePanel(""),      
  sidebarLayout(
    sidebarPanel(
       ...
    ),
    mainPanel({
      htmlOutput("Plot")
    }
    )
  )
))

但这只会产生一个空白区域。我省略了sidebarPanel，因为我知道它适用于我正在运行的rendergVis()代码。

任何人都知道如何做我想做的事情？