Visualisasi Data adalah komunikasi visual data atau konversi data mentah menjadi wawasan yang dapat dengan mudah ditafsirkan oleh pembaca Anda. Visualisasi data merupakan bagian yang sangat penting untuk mengkomunikasikan hasil analisis yang kita lakukan. Selain itu, komunikasi juga membantu untuk mendapatkan gambaran umum tentang data selama proses analisis data sehingga dapat memutuskan metode analisis mana yang akan diterapkan pada data tersebut. Salah satu fungsi yang dimiliki R untuk visualisasi data adalah fungsi barplot().
Fungsi barplot() adalah fungsi umum untuk membuat diagram bar pada R. Untuk pemahaman yang lebih baik, berikut adalah contoh diagram batang dengan kumpulan data VADeaths. Untuk memuatnya, jalankan sintaks berikut :
VADeaths
## Rural Male Rural Female Urban Male Urban Female
## 50-54 11.7 8.7 15.4 8.4
## 55-59 18.1 11.7 24.3 13.6
## 60-64 26.9 20.3 37.0 19.3
## 65-69 41.0 30.9 54.6 35.1
## 70-74 66.0 54.3 71.1 50.0
par(mfrow=c(1,2))
barplot(VADeaths[, "Rural Female"], main="a")
barplot(VADeaths[, "Rural Female"], main="b", horiz=TRUE)
par(mfrow=c(1,1))
Kita dapat mengubah warna bilah apa saja, baik bilah garis besar maupun bilah kotak. Selain itu, kita juga bisa mengganti nama grup yang dibuat sebelumnya. Dibawah ini merupakan sintaks untuk menjalankannya :
barplot(VADeaths[, "Rural Female"],
# ubah warna outline/ bilah garis menjadi black
border="black",
# ubah warna bilah kotak
col= c("mistyrose", "lightcyan", "lavender", "cornsilk", "lightblue"),
# ubah nama grup dari A sampai E
names.arg = LETTERS[0:5],
# ubah orientasi menajadi horizontal
horiz=TRUE)
Ada dua pengaturan posisi untuk diagram batang multi-grup, yaitu stacked bar plot ( diagram batang bertumpuk ) dan grouped bar plot ( diagram batang bergerombol ). Sticked bar plot adalah bar plot yang menunjukkan proporsi komponen dalam setiap kelompok. Sedangkan grouped bar plot adalah bar plot untuk melihat perbedaan individu dalam setiap kelompok. Berikut contoh penerapannya kedalam sintaks :
# grouped bar plot
barplot(VADeaths,
border="steelblue",
col = c("grey", "yellow", "steelblue", "green", "orange"),
legend = rownames(VADeaths), beside = TRUE)
# stacked bar plot
barplot(VADeaths,
border="steelblue",
col = c("grey", "yellow", "steelblue", "green", "orange"),
legend = rownames(VADeaths))