Apakah World Cloud itu?

Penggunaan word cloud akan membantu para peneliti untuk mendapatkan pemahaman secara utuh tentang suatu ide atau gagasan dari seseorang atau tulisan seseorang dalam suatu waktu tertentu.

Visualisasi memberikan kemudahan dalam melakukan interpretasi dan melakukan interpetasi langsung terhadap ide yang penting. Terkait hal tersebut, bahasa sebagai citra visual dapat memberikan akses instan terhadap distribusi ide dalam analisis wacana dibandingkan bahasa dalam bentuk wacana tertulis.

Word cloud merupakan salah satu metode untuk menampilkan data teks secara visual. Grafik ini populer dalam text mining karena mudah dipahami.

Wordcloud yang memiliki fungsi untuk memunculkan citraan visual dari sebuah wacana tertulis kemudian dapat dijadikan sebagai sebuah alat bantu dalam melakukan analisis wacana.

Cara cepat membuat Word Cloud

Aktifkan library ini

library(wordcloud)
## Loading required package: RColorBrewer
library(rvest)
## Loading required package: xml2
library(RColorBrewer)

Carilah website yang akan dibuat Wordcloud-nya:

Saya mengambil artikel dari sini…

url <-"https://en.wikipedia.org/wiki/Psychological_testing"

Konversi ke dalam format yang dimengerti oleh bahasa pemrograman

page <- read_html(url)
page <- html_text(page,trim = TRUE)
page <- gsub("\n","",page, fixed = FALSE)
page <- gsub("\t","",page, fixed = FALSE)

Tampilkan Wordcloudnya

wordcloud(page)
## Loading required namespace: tm
## Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation): transformation
## drops documents
## Warning in tm_map.SimpleCorpus(corpus, function(x) tm::removeWords(x,
## tm::stopwords())): transformation drops documents

Tentukan frekuensi kata-kata yang paling sering muncul

wordcloud(page,min.freq = 3)
## Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation): transformation
## drops documents
## Warning in tm_map.SimpleCorpus(corpus, function(x) tm::removeWords(x,
## tm::stopwords())): transformation drops documents

Merubah warna dari berbagai kombinasi kata:

palette <- brewer.pal(n = 9, "Paired")
wordcloud(page,colors = palette)
## Warning in tm_map.SimpleCorpus(corpus, tm::removePunctuation): transformation
## drops documents
## Warning in tm_map.SimpleCorpus(corpus, function(x) tm::removeWords(x,
## tm::stopwords())): transformation drops documents

Semoga bermanfaat.