Wczytywanie pliku tekstowego (ui)
Zamiast wpisywać długi tekst w pole formularza, wygodniej jest przesłać plik tekstowy – zwłaszcza gdy tekst jest bardzo długi.
Do wczytywania plików w aplikacji Shiny służy funkcja fileInput().
To ćwiczenie jest częścią kursu
Studia przypadków: tworzenie aplikacji webowych w Shiny w R
Instrukcje do ćwiczenia
Dodaj do aplikacji Shiny pole wyboru pliku z identyfikatorem wejścia "file" i etykietą "Select a file".
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
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)