Estou construindo um widget no Shiny e gostaria de ter a opção "all" para selecionar todos os dados disponíveis e não realizar uma filtragem.

Basicamente, eu gostaria de ter o seguinte código (usando o dplyr):

filt<-sample(c("All", unique(mtcars$carb)),1)

data1<- mtcars %>% 
                  ifelse (filt=="All", select(), filter(carb==filt))

Irá filtrarmtcars com base no valor defilt.

E sefilt == "Todos" então ele não filtra e retorna simplesmentemtcars.

Alguma solução elegante?