I am trying to have several html files in my brilliant application, but it seems that it can only show one at a time.
My user interface:
shinyUI(
mainPanel(
tableOutput("view"),
plotOutput("view2")
))
And my server:
library(googleVis)
library(RMySQL)
shinyServer(function(input, output) {
datasetInput <- reactive({
"try2" = subset(try1, idCampaign == input$inputId)
})
output$view <- renderGvis({
gvisTable(datasetInput(),options=list(width=1000, height=270, col='blue'))
})
output$view2 <- renderGvis({
gvisScatterChart(datasetInput2())
})
})
source
share