inherits(min, "Date") 错误：缺少参数 "min"，没有默认值

Question

UI.R 是

ui <- fluidPage(
titlePanel("PLOTS FOR JCI"),

sidebarLayout(
sidebarPanel(
  helpText("JCI PLOTTING
           information from Chiller Data"),

  selectInput("sel", 
              label = "Choose a variable to display",
              choices = c("WAR-CODE ( States )" , "VSD-CONVHS-T ( 
             degF )", "MANUAL PRV % OPEN ( % )",
                          "WIND SPEED ( mph )","REFPOS-SP ( % )","MOT-
             FLA ( % )",
                          "LL-SV-STS ( offon )","TEMPERATURE ( degF )", 
            "EVAP-P ( psi )",
                          "VSD OP-Hz ( hz )","MANUAL EVAP RETURN 
             PRESSURE ( psi )")),
              selected = "WAR-CODE ( States )"),

             sliderInput("range", 
             label = "Number of observations to view:",
             value = 10)
             ),

             mainPanel(plotOutput("map"))
             )

有解决办法请帮忙解决。我在这里没有使用 min 函数。尝试清除环境仍然出现错误。

Answer 1

此错误是因为您在 sliderInput 中缺少 min 和 max 参数。您的 sliderInput 应该是这样的：

sliderInput("range", 
                label = "Number of observations to view:",
                value = 10, min = 0, max = 20)
    )

inherits(min, "Date") 错误：缺少参数 "min"，没有默认值

Error in inherits(min, "Date") : argument "min" is missing, with no default

r

shinydashboard