Разрешить пользователю выбирать между различными диаграммами

Question

Я создал несколько диаграмм gvis Geo, которые отображаются в одной и той же вкладке, и я хотел бы, чтобы пользователь мог выбирать между диаграммой, используя поле выбора или подобное, но я не могу получить функция для работы.

Может ли кто-нибудь помочь?

ui.R

htmlOutput("schoolaid"), 
br(), 
htmlOutput("income") 

Есть простой способ, чтобы пользователь мог выбрать между "schoolaid" и "доходы" выходы?

Answer 1

Вот простой пример, который может вам помочь.

library(shiny) 

ui <- shinyUI(fluidPage(

    titlePanel("Old Faithful Geyser Data"), 

    sidebarLayout(
     sidebarPanel(
     selectInput("select", "Select a graph", c("mtcars", "cars")) 
    ), 

     mainPanel(
     conditionalPanel("input.select=='mtcars'", 
          plotOutput('mtcars')), 
     conditionalPanel("input.select=='cars'", 
          plotOutput('cars')) 
    ) 
    ) 
)) 

server <- shinyServer(function(input, output) { 

    output$mtcars <- renderPlot({ 
     plot(mtcars$mpg, mtcars$disp) 
    }) 

    output$cars <- renderPlot({ 
     plot(cars$speed,cars$dist) 
    }) 
}) 

shinyApp(ui = ui, server = server)