워드 클라우드 Shiny 앱
전체 손자병법 본문이 담긴 artofwar라는 예시 데이터셋이 제공됩니다. 책의 앞부분과 뒷부분 몇 구절을 확인하려면 head(artofwar) 또는 tail(artofwar)를 실행해 보세요.
영상에서 언급했듯이, 워드 클라우드는 이전에 보았던 출력 유형이 아니므로 새로운 출력/렌더 함수 쌍이 필요합니다: wordcloud2Output()와 renderWordcloud2()입니다. 이러한 출력 함수는 wordcloud2 패키지에서 제공합니다.
이 연습은 강의의 일부입니다
사례 연구: R의 Shiny로 웹 애플리케이션 만들기
연습 안내
create_wordcloud() 함수, artofwar 데이터셋, 그리고 필요한 모든 패키지가 워크스페이스에 준비되어 있어요.
- UI에 출력 ID가
cloud인 워드 클라우드 출력 자리표시자를 추가하세요. - 워드 클라우드 객체를 렌더링하고, 이를
output리스트의 올바른 항목에 할당하세요(11행).
참고로 create_wordcloud()는 저희가 미리 정의해 둔 함수예요. 로컬 컴퓨터의 RStudio에서는 실행할 수 없습니다. 코드가 궁금하다면 콘솔에 create_wordcloud를 입력해 내용을 확인해 보세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
# Define UI for the application
ui <- fluidPage(
h1("Word Cloud"),
# Add the word cloud output placeholder to the UI
___(outputId = "cloud")
)
# Define the server logic
server <- function(input, output) {
# Render the word cloud and assign it to the output list
output$___ <- ___({
# Create a word cloud object
create_wordcloud(artofwar)
})
}
# Run the application
shinyApp(ui = ui, server = server)