Как использовать несколько номеров в SelectInput в Shiny

Question

У меня есть вопрос относительно Shiny и функции SelectInput.Это мой selectinput прямо сейчас:

 selectInput("top1", label = h3("TOP500"),
                     c("TRUE" = 1,
                       "FALSE" = 0,
                       "BOTH" = 0|1), selected = 0)

Я использовал его для следующей функции:

filter(sales_category_id == input$top1)

Это таблица, которая видоизменяется dplyr, и в конце я хочу выбратьмежду sales_category_id 0,1 или оба.

Может кто-нибудь помочь мне?Это не работает, и все, что я пробовал, не дало мне правильный результат.

Первый вопрос, кстати, поэтому, если я написал что-то неясное, пожалуйста, дайте мне знать :)

РЕДАКТИРОВАТЬ:

Поскольку идентификатор может быть только 0 или 1, я исправил еговот так:

selectInput("top1", label = h3("TOP500"),
                     c("TRUE" = 0,
                       "FALSE" = 1,
                       "BOTH" = 2), selected = 0)

filter(sales_category_id != input$top1

Мне все еще интересен ответ.

Answer 1

                        selectInput("top1", label = h5("TOP500"),
                     c("TRUE" = 1,
                       "FALSE" = 0,
                       "BOTH" = "BOTH"), selected = "BOTH") 

    filter(if (input$top1 == 1) sales_category_id %in% 1 
           else if (input$top1 == 0) sales_category_id %in% 0 
           else sales_category_id %in% c(0:100)) %>%

В конце концов, это мое лучшее решение :)