library(shiny)
library(shiny.semantic)
# Create a week field
uirender(
tagList(
div(class = "ui icon input",
style = NULL,
"",
shiny_input(
"my_id",
tags$input(type = "week", name = "my_id", min = NULL, max = NULL),
value = NULL,
type = "text"),
icon("calendar"))
)
)
Run the code above in your browser using DataLab