ComenzarEmpieza gratis

Sube un archivo de texto (ui)

En lugar de escribir un texto muy largo en una caja, puede ser más cómodo subir un archivo de texto si el contenido es extremadamente largo.

La subida de archivos en una app Shiny se hace con fileInput().

Este ejercicio forma parte del curso

Casos prácticos: crea aplicaciones web con Shiny en R

Ver curso

Instrucciones del ejercicio

Añade una entrada de archivo a la app Shiny con un ID de entrada "file" y una etiqueta "Select a file".

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

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)
Editar y ejecutar código