워드 클라우드 매개변수 바꾸기
create_wordcloud()에는 선택적 인수 두 가지가 있습니다. 최대 단어 수를 지정하는 정수 num_words와, 이미지의 배경색을 지정하는 background입니다.
현재 Shiny 앱은 항상 동일한 매개변수로 워드 클라우드를 출력하고 있어요. 워드 클라우드 생성 함수가 이 두 매개변수를 받는 만큼, 이를 쓰지 않는 것은 아깝겠죠. 매개변수는 Shiny 입력으로 사용자가 조절할 수 있어야 합니다.
여러분의 작업은 Shiny 앱에 입력 두 개를 추가하고, 이 입력값을 워드 클라우드의 num_words와 background 매개변수로 사용하는 것입니다.
이 연습은 강의의 일부입니다
사례 연구: R의 Shiny로 웹 애플리케이션 만들기
연습 안내
필요한 패키지들은 모두 로드되어 있으며, colourpicker도 포함되어 있어요. 다음을 수행하세요:
- ID가 "num"이고 기본값이 100, 최소값이 5인 숫자 입력을 추가하세요.
- ID가 "col"이고 라벨이 "Background color", 기본 색상이 "white"인 색상 입력(
colourpicker패키지)을 추가하세요. - 두 입력의 값을 사용해
create_wordcloud()의 매개변수(16번째 줄)를 설정하세요.
실습형 인터랙티브 연습
이 예제를 이 샘플 코드를 완성하여 풀어보세요.
ui <- fluidPage(
h1("Word Cloud"),
# Add a numeric input for the number of words
___(inputId = ___, label = "Maximum number of words",
value = ___, min = ___),
# Add a color input for the background color
___(___),
wordcloud2Output("cloud")
)
server <- function(input, output) {
output$cloud <- renderWordcloud2({
# Use the values from the two inputs as
# parameters to the word cloud
create_wordcloud(artofwar,
num_words = ___, background = ___)
})
}
shinyApp(ui = ui, server = server)