Massively faster selectInput