Eine Textdatei hochladen (ui)
Anstatt einen sehr langen Text in ein Eingabefeld zu tippen, ist es oft bequemer, eine Textdatei hochzuladen, wenn der Text extrem lang ist.
Das Hochladen von Dateien in eine Shiny-App erfolgt mit fileInput().
Diese Übung ist Teil des Kurses
Fallstudien: Webanwendungen mit Shiny in R erstellen
Anleitung zur Übung
Füge der Shiny-App ein Dateieingabefeld mit der Input-ID "file" und dem Label "Select a file" hinzu.
Interaktive Übung
Vervollständige den Beispielcode, um diese Übung erfolgreich abzuschließen.
ui <- fluidPage(
h1("Word Cloud"),
sidebarLayout(
sidebarPanel(
textAreaInput("text", "Enter text", rows = 7),
# Add a file input
___,
numericInput("num", "Maximum number of words",
value = 100, min = 5),
colourInput("col", "Background color", value = "white")
),
mainPanel(
wordcloud2Output("cloud")
)
)
)
server <- function(input, output) {
output$cloud <- renderWordcloud2({
create_wordcloud(input$text, num_words = input$num,
background = input$col)
})
}
shinyApp(ui = ui, server = server)