Блестящий выборВведите закрытые варианты после каждого выбора

Question

Я хочу настроить блестящий виджет selectizeInput, чтобы разрешить выбор нескольких вариантов, но поведение по умолчанию - держать список вариантов открытым до щелчка в другом месте (см. http://shiny.rstudio.com/gallery/selectize-examples.html номер 2).В моем приложении пользователь должен время от времени выбирать несколько вариантов, но чаще всего только один.Следовательно, я хочу, чтобы список показанных вариантов свернулся после каждого отдельного выбора, но блестящие параметры selectizeInput, похоже, не позволяют эту функциональность.

Есть идеи, как изменить это стандартное поведение?

selectizeInput(
        inputId = "portfolios",
        label = "Select Portfolio(s):",
        choices = currPortfolios,
        selected = "",
        multiple = TRUE,
        options = list(maxItems = 5)
      )

Answer 1

Вы можете использовать опцию closeAfterSelect = TRUE.

selectizeInput(
        inputId = "portfolios",
        label = "Select Portfolio(s):",
        choices = currPortfolios,
        selected = "",
        multiple = TRUE,
        options = list(maxItems = 5, closeAfterSelect = TRUE)
      )

Обратите внимание, что это не на 100% удобно для пользователя - вам нужно щелкнуть мышью вдали от ввода и затем снова щелкнуть в любом пустом месте внутри ввода, чтобы заново открыть список.Ничего страшного, только к вашему сведению.