BaşlayınÜcretsiz başlayın

Kendi kelimelerini kullan

textAreaInput(), kullanıcıların tipik bir textInput()'ın izin verdiğinden çok daha uzun metin girmesine olanak tanımak istediğinde kullanışlıdır. Metin alanları birden fazla satıra yayılır, dikey bir kaydırma çubuğuna sahiptir ve kaç satırın görüneceğini belirleyebilen bir rows parametresi vardır.

Daha büyük olmaları dışında, metin alanı girdileri diğer tüm açılardan metin girdilerine çok benzer şekilde davranır.

Bu egzersiz, kursun bir parçasıdır

Vaka Çalışmaları: R ile Shiny Kullanarak Web Uygulamaları Geliştirme

Kursa Göz Atın

Egzersiz talimatları

Görevin, kullanıcının kendi kelimeleriyle bir kelime bulutu oluşturmasına izin vermek için bir metin alanı girişi eklemek. Özellikle:

  • inputId'si "text" ve etiketi "Enter text" olan, 7 satırlık bir metin alanı girişi ekle.
  • Kelime bulutu için data kaynağı olarak artofwar kitabı yerine metin alanının değerini kullan (satır 20).

Uygulamalı etkileşimli egzersiz

Bu egzersizi bu örnek kodu tamamlayarak deneyin.

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)
Kodu Düzenle ve Çalıştır