shiny - サイドバーをリンクして適切な選択を行うための conditionalPanel - Shiny R

Question

下の図に示すように設計された UI があり、ここで実際に次のような条件を設定したいと考えています。

UI.R

サイドバーから「サドルジョイント」ボックスを選択/チェックするlocationと、オプション「GEO_10500」、「GEO_77298」がサイドバーから選択されDatasets:ます。これが私が試したサーバーコードで、うまくいきませんでした。これを達成する方法を教えてください。ありがとう！

サーバー.R

conditionalPanel( condition = "input.location = 'Saddle Joint'", updateCheckboxGroupInput(session, "datasets", "Datasets:", choices=c("GEO_10500", "GEO_77298"), selected = "GEO_10500" ) )

サーバー.R

`

observe({

if ("input.location== 'Saddle Joint'") {

  updateCheckboxGroupInput(session,
                           "datasets", "Datasets:", choices = c("GEO_15602","GEO_21537"),
                           selected= c("GEO_15602","GEO_21537"))
}

})

`