selectinputの値を取得して、他のselectinputに可変データを表示する方法

Question

私は選択した値をユーザが検索したいので、このコードをserver.Rに入れます。 selected_value <- input$valtext A <-Filter (catalog, gene_name == selected_value) B <-select (A,snp) valtext：idです

selectizeInput( 'snpvalue', 'Choisir le snp a visualiser :', choices = "" , multiple = TRUE, options = list(maxItems = 2) )

：私のselectizeinputの

はその後、私は「選択肢」内の別のselectizeinputでユーザー （B）によってselected_valueのSNP対応を示すことが、私は、変数Bを取得する必要がこれをやりたいです

私のpr私が変数Bを持っていれば、私はeasly selectizeinputでそれを見ることができるからです。

については、

Answer 1

ui.Rでは、あなたの第二selectizeInputserver.Rで

uiOutput('snpselect') 

、とあなたは `renderUI`を使用して、サーバー側からのUIを作成する必要が

output$snpselect <- renderUI({ 
    selected_value <- input$valtext 
    A <- Filter (catalog, gene_name == selected_value) 
    B <- select (A,snp) 
    selectizeInput( 
    'snpvalue', 'Choisir le snp a visualiser :', choices = B, multiple = TRUE, options = list(maxItems = 2) 
) 
})