여러 개의 입력 추가하기
입력은 하나만 넣을 수 있는 게 아니에요. 예를 들어, 사용자에게 특정 연도뿐 아니라 평균 수면 시간(시간 단위)도 선택하게 하고 싶다고 해봅시다.
이를 위해 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)