Aan de slagBegin gratis

Een tekstbestand uploaden (ui)

In plaats van een lang stuk tekst in een veld te typen, is het vaak handiger om een tekstbestand te uploaden als de tekst erg lang is.

Bestanden uploaden in een Shiny-app doe je met fileInput().

Deze oefening maakt deel uit van de cursus

Casestudies: webapplicaties bouwen met Shiny in R

Bekijk cursus

Oefeninstructies

Voeg een bestandsinvoer toe aan de Shiny-app met input-ID "file" en het label "Select a file".

Interactieve oefening met praktijkervaring

Probeer deze oefening door deze voorbeeldcode aan te vullen.

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)
Code bewerken en uitvoeren