Add date picker.
Id to access value.
Current date.
Minimum and maximum selectable dates.
Set to TRUE
to heave the calendar appear as overlay.
Language.
Additional CSS class.
any other option
Does not work in RStudio, open app in browser.
if(interactive()){
ui <- bulmaPage(
bulmaContainer(
br(),
bulmaDateInput("date", Sys.Date(), overlay = TRUE),
verbatimTextOutput("selected")
)
)
server <- function(input, output){
output$selected <- renderText({
input$date
})
}
shiny::shinyApp(ui, server)
}