0
我在一个选项卡中绘制ggvis图并在另一个选项卡中生成一个rPivottable。 如果我同时添加到ui.R,我无法生成数据透视表。ggvis和rpivottable在Shiny中的冲突
下面是一个示例。
app <- shinyApp(ui = fluidPage(navbarPage("v0.5",
tabPanel("Report",sidebarLayout(
sidebarPanel(actionButton("bbutton","Generate Report")),
mainPanel(rpivotTableOutput("myPivot"),verbatimTextOutput("mytext")))),
tabPanel("PLOT",sidebarLayout(
sidebarPanel(actionButton("cButton","Plot")),#mainPanel()
mainPanel(ggvisOutput("myPlot"))
)
)
)),
server = function(input,output){
observe({
input$bbutton
output$mytext <- renderText("Hello There")
#mydata <- getPivotTableData()
mydata <- mtcars
output$myPivot <- renderRpivotTable({
rpivotTable(data = mydata)
})
})
}
)
runApp(app)
如果我外卖代码
mainPanel(ggvisOutput("myPlot"))
,并插入
mainPanel()
枢轴表中生成就好了。
我使用以下版本: ggvis_0.4.2 rpivotTable_0.1.5.20
任何帮助吗?
感谢
正确。在htmlwidgets之间,ggvis和rpivottable的冲突产生于不同的jqueryui(实际的罪魁祸首)组件,目前没有最终的解决方案(它必须基于htmlwidgets)。使用ggvis的最新github版本和rpivotTable的CRAN版本都可以。请让我知道(在github上)是否/何时我们会再次发生分歧。 – Enzo