允許

Question

我已經創建了顯示在同一個tabpanel，我希望用戶能夠使用一個選擇框或類似的，但是我不能讓圖表之間進行選擇幾個gvis地理圖表不同的圖表之間的用戶選擇工作的功能。

任何人都可以協助嗎？

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)