插入多个输入控件

您可以添加不止一个输入控件。假设您还希望应用用户选择平均睡眠时长，以及某一个具体年份。

为此，您可以在 ui 中再插入一个 sliderInput()，其取值为感兴趣的年份。

本练习中，shiny 库已为您加载。

本练习是课程的一部分

使用 shinydashboard 构建仪表板

查看课程

练习说明

为您的 shinyApp 添加另一个 sliderInput() 作为第二个输入，并将其标签设为 "yearlabel"。
将取值范围设置为 2003 到 2017。

交互式实操练习

通过完成这段示例代码来试试这个练习。

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  sliderInput("sliderlabel",
              "Average hours of sleep",
              min = 7.5, max = 11,
              value = 8, step = 0.5),
  # Add another sliderInput and label the input as "yearlabel"
  ___(___,
               "Year",
            # Set the number range to be between 2003 and 2017
               ___, ___,
               value = 2004, step = 1, sep = ""))
server <- function(input, output, session) {
}
shinyApp(ui, server)

编辑并运行代码