Shiny‑додаток для хмаринки слів
Вам надано зразковий набір даних artofwar, що містить увесь текст книги Art of War. Ви можете переглянути наданий текст Art of War, запустивши head(artofwar) або tail(artofwar), щоб побачити перші та останні кілька віршів книги.
Як згадувалося у відео, оскільки хмаринки слів — це новий для вас тип виводу, для них потрібна інша пара функцій виводу та рендерингу: wordcloud2Output() і renderWordcloud2(). Ці функції доступні в пакеті wordcloud2.
Ця вправа є частиною курсу
Case Studies: створення вебзастосунків із Shiny в R
Інструкції до вправи
Функція create_wordcloud(), набір даних artofwar і всі потрібні пакети доступні у вашому робочому середовищі.
- Додайте до інтерфейсу заповнювач для виводу хмаринки слів з outputId
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)