UpdatePickerInput по умолчанию выбирает все варианты

Я знаю, что на StackExchange есть очень похожий вопрос (pickerInput по умолчанию выбирает все варианты), однако решение не применимо к моей проблеме. У меня есть updatePickerInput, который основан на двух входах. на updatePickerInput у меня есть кнопки selectAll и clearAll от shiningWidgets. Я хочу, чтобы selectAll был значением по умолчанию, но, поскольку он динамический, я не знаю, как передать мой выбор в выбранный вариант.

Вот мой соответствующий код пользовательского интерфейса:

radioButtons(inputId = 'selected_group', label = 'group', choices = '')

Это мой код наблюдаемого события:

observeEvent(c(input$selected_tab,input$selected_group),{
    req(input$selected_group)

    updatePickerInput(
        session,
        'selected_subgroup',
        choices = df %>%
            filter(tab == input$selected_tab) %>%
            filter(group == input$selected_group) %>%
            select(subgroup) %>%
            distinct(subgroup) %>%
            arrange(subgroup) %>%
            .[[1]]
    )
})