Shiny-App für Word Clouds
Dir steht ein Beispieldatensatz namens artofwar zur Verfügung, der den vollständigen Text des Buchs Art of War enthält. Du kannst dir den Art of War-Text ansehen, indem du head(artofwar) oder tail(artofwar) ausführst, um die ersten und letzten Verse des Buchs zu sehen.
Wie im Video erwähnt: Da Word Clouds ein Ausgabetyp sind, den du bisher nicht gesehen hast, benötigen sie ein neues Paar aus Output- und Render-Funktionen: wordcloud2Output() und renderWordcloud2(). Diese Output-Funktionen sind im Paket wordcloud2 verfügbar.
Diese Übung ist Teil des Kurses
Fallstudien: Webanwendungen mit Shiny in R erstellen
Anleitung zur Übung
Die Funktion create_wordcloud(), der Datensatz artofwar und alle notwendigen Pakete stehen dir in deinem Workspace zur Verfügung.
- Füge in der UI einen Platzhalter für die Word-Cloud-Ausgabe mit dem outputId
cloudhinzu. - Rendere das Word-Cloud-Objekt und weise es dem richtigen Eintrag in der
output-Liste zu (Zeile 11).
Übrigens: create_wordcloud() ist eine Funktion, die wir für dich definiert haben. Du kannst sie nicht in deinem eigenen RStudio auf deinem Computer ausführen. Wenn du sie dir ansehen willst, tippe create_wordcloud in die Konsole.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
# 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)