Sebelum melakukan visualisasi data, akan diinputkan data terkait dengan Korban Tsunami di beberapa negara. Berikut terlampir data Korban Tsunami:
korban <- c(10,12,4,16,8)
negara <- c("US","UK","Australia","Germany","France")
persen <- round(korban/sum(korban)*100)
data.frame(korban,negara,persen)
## korban negara persen
## 1 10 US 20
## 2 12 UK 24
## 3 4 Australia 8
## 4 16 Germany 32
## 5 8 France 16
Hasil visualisasi data di atas dengan menggunakan Pie Chart disajikan sebagai berikut:
Hasil visualisasi data di atas dengan menggunakan Bar Chart disajikan sebagai berikut:
barplot(korban,col = "#87CEEB", main = "Barplot korban Tsunami", names.arg = negara)
Hasil visualisasi data di atas dengan menggunakan Dot Plot disajikan sebagai berikut:
dotchart(korban,negara, main = "Korban Tsunami",xlab = "Jumlah Korban")
Hasil visualisasi data di atas dengan menggunakan Steam dan Leaf disajikan sebagai berikut:
stem(korban, scale = 2)
##
## The decimal point is at the |
##
## 4 | 0
## 6 |
## 8 | 0
## 10 | 0
## 12 | 0
## 14 |
## 16 | 0
Hasil visualisasi data dengan menggunakan Histogram disajikan sebagai berikut:
hist(korban, breaks = 9, main = "Korban Tsunami",col = "#87CEEB",xlab = "Jumlah Korban Tsunami")