可能有光泽的bug - 多个updateRadioButtons不起作用？

Question

我有3组单选按钮，我想在某些条件下更新/重置它们：

plotChoices <- c(
    "Line Graph" = "line",
    "Scatter Plot" = "scatter"
)

所以如果＆＃34; line＆＃34;在这3组中没有全部一起选中，然后重置plot2＆s;以及plot2＆＃39; s：

observeEvent(input$plot1, {
    if (input$plot1 == 'line' &&
        (!is.null(input$plot2) && input$plot2 == 'line') &&
        (!is.null(input$plot3) && input$plot3 == 'line')
    ) return ()
    updateRadioButtons(
        session,
        "plot2",
        label = "Analyze Plot2 data:",
        choices = plotChoices,
        selected = character(0),
        inline = FALSE
    )
    updateRadioButtons(
        session,
        "plot3",
        label = "Analyze Plot3 data:",
        choices = plotChoices,
        selected = character(0),
        inline = FALSE
    )
    session$sendCustomMessage(type = "resetValue", message = "plot2")
})

但它根本不起作用。它只重置plot2而不是plot3。

有什么想法吗？这是Shiny中的一个错误吗？