0

ドロップダウンメニューがありますselectizeInput- これを使用して、さらに分析するためにデータフレームをサブセット化する必要があります。

次のことを考慮してください。

d - データフレーム (「test」という名前の列があります)

メニュー -selectizeInputドロップダウン

d[d$test %in% input$menu, ]

これは私が実際に必要とすることをしません。何かご意見は?

4

1 に答える 1

0

それはうまくいくはずです。

うい

library(shiny)

shinyUI(fluidPage(

  sidebarLayout(
    sidebarPanel(
      selectizeInput("in", "in", choices = as.list(letters[1:10]), multiple = TRUE)
    ),

    mainPanel(
      verbatimTextOutput("view")
    )
  )
))

サーバ

library(shiny)

d <- data.frame(test = letters[1:10], value = 1:10)

shinyServer(function(input, output) {

  view <- reactive({d[d$test %in% input$"in", ]})

  output$view <- renderPrint(view())

})
于 2016-08-29T19:20:11.300 に答える