訪問R Shiny selectizeInput標籤

如何訪問從R發光的selectizeInput控件的選定項的標籤？訪問R Shiny selectizeInput標籤

在下面的例子中，如果DM用戶點擊請教，我想檢索值DM問，不DM_ask

output$group_quote_type_holder <- renderUI({ 
quote_type_names <- c("Bid Price", "Ask Price", "DM Bid","DM Ask") 
quote_type_sql <- c("price_bid","price_ask","DM_bid","DM_ask") 
names(quote_type_sql) <- quote_type_names 
quote_type_named_list <- quote_type_sql 
selectizeInput("group_quote_type", 
      label = "Select a type:", 
      choices = quote_type_named_list, 
      selected = "DM_ask") 
})# end renderUI

來源

2017-07-05 Simon Wuya

如果在selectizeInputchoices值是命名列表，名稱顯示給用戶，並且相應的值在服務器中返回。

如果要顯示「DM詢問」並返回「DM詢問」，只需使用您的矢量quote_type_names ：

selectizeInput(
    inputId = "group_quote_type", 
    label = "Select a type:", 
    choices = c("Bid Price", "Ask Price", "DM Bid", "DM Ask"), 
    selected = "DM Ask" 
)

編輯

對不起，我聽不懂。我假設quote_type_named_list不會退出globaenv，它只是在renderUI中定義，所以像這樣？

library("shiny") 

ui <- fluidPage(
    uiOutput(outputId = "group_quote_type_holder"), 
    verbatimTextOutput(outputId = "res") 
) 

server <- function(input, output) { 

    quote_type_named_reac <- reactiveValues(x = NULL) 

    output$group_quote_type_holder <- renderUI({ 
    quote_type_names <- c("Bid Price", "Ask Price", "DM Bid","DM Ask") 
    quote_type_sql <- c("price_bid","price_ask","DM_bid","DM_ask") 
    names(quote_type_sql) <- quote_type_names 
    quote_type_named_list <- quote_type_sql 

    quote_type_named_reac$x <- quote_type_named_list 

    selectizeInput(inputId = "group_quote_type", 
        label = "Select a type:", 
        choices = quote_type_named_list, 
        selected = "DM_ask") 
    }) 

    output$res <- renderPrint({ 
    names(which(quote_type_named_reac$x == input$group_quote_type)) 
    }) 
} 

shinyApp(ui = ui, server = server)

來源

2017-07-06 09:18:47 Victorp

謝謝，也許我並不完全清楚。我需要的值保持不變，因爲它們對我的應用程序的邏輯非常重要。我仍然需要檢索特定選定選項的名稱（以顯示在圖表標題中）。基本上我需要選擇應用功能，顯示/ GUI工作的名稱，以及selectizeInput之外的選項。 –

對不起，我誤解了，你不能像'input $ foo'那樣訪問標籤的值，但是你可以存儲選項並在其他地方使用它們。編輯是否回答你的問題？ – Victorp

目的，tx。 –

訪問R Shiny selectizeInput標籤

回答

相關問題