How to add radio buttons in R Shiny