시작하기무료로 시작하기

상호작용이 있는 textOutput

미국의 수면 클리닉에서 일한다고 가정해 볼게요. 미국인의 수면 위생을 파악하기 위해 설문조사를 진행했고, 이제 데이터를 바탕으로 결과를 보고하려고 합니다.

정적인 보고서를 제출하는 대신, 청중이 더 몰입할 수 있도록 인터랙티브 애플리케이션으로 보여주기로 했어요.

먼저 사용자 경험의 일부로, 사용자가 거주 도시를 입력하도록 하고 싶습니다. 사용자가 입력한 값에 따라 텍스트 출력이 업데이트되어야 합니다.

이를 위해 textInput() 함수를 사용하겠습니다.

이 연습은 강의의 일부입니다

shinydashboard로 대시보드 만들기

강의 보기

실습형 인터랙티브 연습

이 예제를 이 샘플 코드를 완성하여 풀어보세요.

ui <- fluidPage(
  titlePanel("Sleeping habits in America"), 
  # Add textInput and label it as "city label"
  ___(___,
            "Which city do you live in?",
            # Leave the value blank and set the placeholder as "Singapore"
            value = ___, placeholder = ___))

server <- function(input, output) {
}

shinyApp(ui, server)
코드 편집 및 실행