Input Data

sebelum melakakuan visuaslisasi data, akan diinputkan data terkait dengan korban tsunami di beberapa negara. Berikut terlampir data korban tersebut:

 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

Visualisasi Pie Chart

Hasil visualisasi data di atas denagn menggunkaan Pie Chart disajk=ikan sebagai berikut:

label<-paste(negara,persen,"%")  #menambahkan persentase pie chart
pie(korban,labels = label, col = rainbow(length(label)),
main = "Pie Chart Korban Tsunami")

##Visualisasi Barplot Hasil visualisasi data di atas denagn menggunkaan Barplot disajikan sebagai berikut:

barplot(korban,col = "blue",main="Barplot korban Tsunami", names.arg = negara)

##Visualisasi Diagram Titik (Dot Plots) Hasil visualisasi data di atas denagn menggunkaan Dot plots disajikan sebagai berikut:

```