The third argument to actionButton()
is icon
which is used to display an icon on button. "OPFOR"
is not a valid value for it hence you get the error. Try :
library(shiny)
ui <- fluidPage(
leafletOutput("mymap"),
p(),
actionButton("Date", "BLUFOR"),
sliderInput("integer", "Integer:",
min = 3, max = 18,
value = 10),
tableOutput("values")
)
server <- function(input, output) {}
shinyApp(ui, server)
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…