我试图在我的timeInput上放置15分钟的步长,以生成一个闪亮的应用程序,但参数min.steps无法识别。我在做错什么吗?
library(shiny)
library(shinyTime)
ui <- fluidPage(
titlePanel("shinyTime Example App"),
sidebarLayout(
sidebarPanel(
timeInput(inputId = "time_input", label = "Enter time", value = strptime("12:34:56", "%T"), minute.steps = 15)
),
mainPanel(
textOutput("time_output")
)
)
)
server <- function(input, output, session) {
output$time_output <- renderText(strftime(input$time_input, "%T"))
}
shinyApp(ui, server)
这是我得到的错误:
Error in timeInput(inputId = "time_input", label = "Enter time", value = strptime("12:34:56", :
unused argument (minute.steps = 15)
我检查了我的软件包安装(shinyTime),一切正常。