updatePickerInput默认选择所有选项

Question

我知道StackExchange（pickerInput default select all choices）上有一个非常相似的问题，但是，该解决方案无法应用于我的问题。 我有一个基于两个输入的updatePickerInput。在updatePickerInput上，我有shinyWidgets的selectAll和clearAll按钮。我想将selectAll设置为默认值，但是由于它是动态的，所以我不知道如何将我的选择传递到所选选项中。

这是我相关的ui代码：

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

这是我的watchEvent代码：

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]]
    )
})

Answer 1

要动态选择所有选项，您需要将相同的信息传递给updatePickerInput的{​​{1}}和choices参数：

selected