条件が光沢で満たされないとselectizeInputを非表示にする方法

Question

条件が満たされているときに問題が発生しました。ウェブサイトからselectizeInputを隠したいと思います。しかし、私はそれをすることができません。反応性の性質による。 server.Rファイルに次のコードを入れなければなりませんでした。 ui.R

conditionalPanel(
    condition ="input.Salesperson == 'All", 
    uiOutput('Super') 
) 

の行に続き

output$Super <- if(is.null(session$user)){ 
    renderUI({ 

     selectizeInput("Salesperson" 
       , "Salesperson:" 
       , sort(getUsers()) 
       , selected = 'All' 
       , NULL 
       , multiple =FALSE) 
}) 
}else if(session$user == 'tester'){ 
renderUI({ 
    selectizeInput("Salesperson" 
       , "Salesperson:" 
       , sort(getUsers()) 
       , selected = 'All' 
       , NULL 
       , multiple =FALSE) 
}) 

} else { 
    renderUI({ 
     selectizeInput("Salesperson" 
       , "Salesperson:" 
       , session$user 
       , selected = session$user 
       , NULL 
       , multiple =FALSE) 
}) 
    } 

それはelseステートメントに落ちた場合は、私がrenderUIにしたくありません。しかし、私はそれをすることができません。レンダリングUIコードを他から削除した場合それはそれをクラッシュさせます。

私は間違っていますか？

Answer 1

あなたは/条件付きのパネルを使用することはできませんし、あなたがshinyjsパッケージ