Aplikasi Shiny word cloud
Anda disediakan himpunan data contoh bernama artofwar, yang berisi seluruh teks buku Art of War. Anda dapat meninjau teks Art of War tersebut dengan menjalankan head(artofwar) atau tail(artofwar) untuk melihat beberapa bait pertama dan terakhir dari buku tersebut.
Seperti disebutkan dalam video, karena word cloud bukan keluaran yang pernah Anda lihat sebelumnya, maka diperlukan sepasang fungsi output dan render yang baru: wordcloud2Output() dan renderWordcloud2(). Fungsi output ini tersedia dari paket wordcloud2.
Latihan ini adalah bagian dari kursus
Studi Kasus: Membangun Aplikasi Web dengan Shiny di R
Petunjuk latihan
Fungsi create_wordcloud(), himpunan data artofwar, dan semua paket yang diperlukan sudah tersedia di ruang kerja Anda.
- Tambahkan placeholder untuk keluaran word cloud ke UI, dengan outputId
cloud. - Render objek word cloud dan tetapkan ke item yang benar dalam daftar
output(baris 11).
Sebagai informasi, create_wordcloud() adalah fungsi yang kami definisikan untuk Anda. Anda tidak akan dapat menjalankannya di RStudio Anda sendiri di komputer. Jika Anda ingin melihatnya, ketik create_wordcloud di konsol.
Latihan interaktif praktis
Cobalah latihan ini dengan menyelesaikan kode contoh berikut.
# Define UI for the application
ui <- fluidPage(
h1("Word Cloud"),
# Add the word cloud output placeholder to the UI
___(outputId = "cloud")
)
# Define the server logic
server <- function(input, output) {
# Render the word cloud and assign it to the output list
output$___ <- ___({
# Create a word cloud object
create_wordcloud(artofwar)
})
}
# Run the application
shinyApp(ui = ui, server = server)