Data diperoleh dari data set yang ada di R
head (USArrests)
## Murder Assault UrbanPop Rape
## Alabama 13.2 236 58 21.2
## Alaska 10.0 263 48 44.5
## Arizona 8.1 294 80 31.0
## Arkansas 8.8 190 50 19.5
## California 9.0 276 91 40.6
## Colorado 7.9 204 78 38.7
Menghitung statistik ringkasan
summary (USArrests)
## Murder Assault UrbanPop Rape
## Min. : 0.800 Min. : 45.0 Min. :32.00 Min. : 7.30
## 1st Qu.: 4.075 1st Qu.:109.0 1st Qu.:54.50 1st Qu.:15.07
## Median : 7.250 Median :159.0 Median :66.00 Median :20.10
## Mean : 7.788 Mean :170.8 Mean :65.54 Mean :21.23
## 3rd Qu.:11.250 3rd Qu.:249.0 3rd Qu.:77.75 3rd Qu.:26.18
## Max. :17.400 Max. :337.0 Max. :91.00 Max. :46.00
Mencari hubungan antara tingkat kejahatan di bebrapa negara bagian USA
cor (USArrests)
## Murder Assault UrbanPop Rape
## Murder 1.00000000 0.8018733 0.06957262 0.5635788
## Assault 0.80187331 1.0000000 0.25887170 0.6652412
## UrbanPop 0.06957262 0.2588717 1.00000000 0.4113412
## Rape 0.56357883 0.6652412 0.41134124 1.0000000
boxplot(USArrests, main="Plot Boxplot", col="green")
Mengetahui jumlah tingkat kekerasan seksual di beberapa negara bagian
USA
head(USArrests[2])
## Assault
## Alabama 236
## Alaska 263
## Arizona 294
## Arkansas 190
## California 276
## Colorado 204
Mengetahui hubungan jumlah tingkat kekerasan seksual dengan jumlah penduduk
df <- USArrests
plot(df$Assault, df$UrbanPop)