Добавление нескольких элементов ввода
В приложение можно добавить сразу несколько элементов ввода. Предположим, вы хотите, чтобы пользователи могли выбрать среднее количество часов сна, а также конкретный год.
Для этого в блоке ui добавьте ещё один sliderInput(), значения которого будут соответствовать годам, представляющим интерес.
В этом упражнении библиотека shiny уже подключена.
Это упражнение является частью курса
Создание дашбордов с помощью shinydashboard
Инструкции к упражнению
- Добавьте ещё один
sliderInput()в качестве второго элемента ввода для вашего shinyApp и присвойте ему метку"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)