Условная панель, чтобы связать боковые панели и сделать соответствующие выборы - Shiny R

У меня есть пользовательский интерфейс, разработанный как показано на рисунке ниже, и я хочу на самом деле установить здесь условие, чтобы:

UI.R

При выборе / установке флажка "Седло" на боковой панели location, Я хочу, чтобы опции "GEO_10500", "GEO_77298" были выбраны на боковой панели Datasets:, Вот код сервера, который я пробовал, и он не работал. Дайте мне знать, как этого можно достичь. Спасибо!

Server.R

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

Server.R

`

observe({

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

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

})

`

0 ответов

Другие вопросы по тегам