ÎncepețiÎncepe gratuit

Folosește propriile cuvinte

Funcția textAreaInput() este utilă atunci când vrei să îi permiți utilizatorului să introducă un text mult mai lung decât permite de obicei textInput(). Zonele de text se întind pe mai multe rânduri, au o bară de derulare verticală și un parametru rows care determină câte rânduri sunt vizibile.

În rest, zonele de text se comportă foarte similar cu câmpurile de text obișnuite.

Acest exercițiu face parte din cursul

Studii de caz: Construirea aplicațiilor web cu Shiny în R

Vezi cursul

Instrucțiuni pentru exercițiu

Sarcina ta este să adaugi o zonă de text care să îi permită utilizatorului să creeze un nor de cuvinte folosind propriile cuvinte. Mai exact:

  • Adaugă o zonă de text cu 7 rânduri, cu un inputId egal cu "text" și o etichetă "Enter text".
  • Folosește valoarea zonei de text ca sursă de data pentru norul de cuvinte, în locul cărții artofwar (linia 20).

Exercițiu interactiv practic

Încearcă acest exercițiu completând acest cod de exemplu.

ui <- fluidPage(
  h1("Word Cloud"),
  sidebarLayout(
    sidebarPanel(
      # Add a textarea 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({
    # Use the textarea's value as the word cloud data source
    create_wordcloud(data = ___, num_words = input$num,
                     background = input$col)
  })
}

shinyApp(ui = ui, server = server)
Editează și rulează codul