shiny - SelectizeInput 関数用の光沢のある sidebarPanels のリンク

Question

sidebarPanel - location最大 2 つのオプションを選択できるドロップダウンがあるとします。ドロップダウンから「Saddle Joint」と「Gliding Joint」を選択すると、別のオブジェクト「x」と「y」が選択され、sidebarPanel - datasets基本的にリンケージが作成される if ループを作成したいと考えています。

このコードを試しましたが、うまくいきません:

if (input$location== "Saddle Joint" & input$location== "Gliding Joint") {

  updateCheckboxGroupInput(session,
                           "datasets", "Datasets:", choices = c("x","y"),
                           selected= c("x","y"))
}

より良い写真のためにスクリーンショットを見てください！

ありがとう！

スクリーンショット