Cara membuat diagram batang di r
Bagan strip adalah jenis bagan yang menampilkan data numerik sepanjang satu pita. Mirip dengan plot kotak , diagram batang dapat membantu Anda memvisualisasikan distribusi data. Diagram batang dapat menjadi alternatif yang baik untuk plot kotak ketika ukuran sampelnya kecil, sehingga Anda dapat melihat titik data individual.
Tutorial ini menjelaskan cara membuat diagram strip di R menggunakan fungsi stripchart() bawaan.
Fungsi stripchart()
Sintaks dasar untuk membuat diagram batang di R adalah:
stripchart(x, metode, jitter, main, xlab, ylab, col, pch, vertical, group.names)
- x : vektor numerik atau daftar vektor numerik untuk diplot. Ini adalah satu-satunya argumen yang diperlukan untuk menghasilkan plot.
- metode : metode yang digunakan untuk memisahkan titik-titik yang memiliki nilai identik. Metode default “overplot” menyebabkan titik-titik ini diplot secara berlebihan, namun dimungkinkan untuk menentukan “jitter” untuk jitter titik atau “stack” untuk menumpuk titik.
- jitter : Ketika metode = “jitter” digunakan, ini memberikan jumlah jittering yang akan diterapkan.
- utama: judul grafik
- xlab : label sumbu x
- ylab : label sumbu y
- col : warna titik plot
- pch : bentuk titik plot
- vertical : bila vertikal adalah “TRUE”, jalur digambar secara vertikal, bukan horizontal secara default
- group.names : label grup untuk dicetak di sebelah plot, jika beberapa vektor numerik diplot.
Bagan batang untuk vektor digital tunggal
Contoh berikut menggunakan iris himpunan data R tertanam untuk membuat diagram batang untuk vektor numerik tunggal.
#view first six rows of iris dataset
head(iris)
# Sepal.Length Sepal.Width Petal.Length Petal.Width Species
#1 5.1 3.5 1.4 0.2 setosa
#2 4.9 3.0 1.4 0.2 setosa
#3 4.7 3.2 1.3 0.2 setosa
#4 4.6 3.1 1.5 0.2 setosa
#5 5.0 3.6 1.4 0.2 setosa
#6 5.4 3.9 1.7 0.4 setosa
Kode berikut membuat bagan pita dasar untuk variabel Sepal.Length :
stripchart(iris$Sepal.Length)
Kita juga dapat menambahkan argumen tambahan untuk menambahkan judul dan label pada sumbu x, mengubah warna titik, mengubah bentuk titik, dan menggunakan metode “jitter” agar setiap titik tidak tumpang tindih:
stripchart(iris$Sepal.Length, main = 'Sepal Length Distribution', xlab = 'Sepal Length', col = 'red', pch = 1, method = 'jitter')
Daripada mencampurkan poin-poinnya, kita bisa “menumpuk” poin-poin tersebut:
stripchart(iris$Sepal.Length,
main = 'Sepal Length Distribution',
xlab = 'Sepal Length',
col = 'red',
pch = 1,
method = 'stack' )
Kita juga dapat menampilkan plot secara vertikal, bukan horizontal default, dan mengubah label sumbu menjadi sumbu y:
stripchart(iris$Sepal.Length, main = 'Sepal Length Distribution', ylab = 'Sepal Length' , col = 'red', pch = 1, method = 'jitter', vertical = TRUE )
Bagan batang untuk beberapa vektor numerik
Kita juga dapat menggambar beberapa diagram garis dalam satu plot dengan meneruskan daftar vektor numerik.
Kode berikut membuat daftar yang berisi variabel Panjang dan Lebar Sepal dalam kumpulan data iris dan menghasilkan grafik batang untuk setiap variabel dalam satu plot:
#create list of variables x <- list('Sepal Length' = iris$Sepal.Length, 'Sepal Width' = iris$Sepal.Width) #create plot that contains one strip chart per variable stripchart(x, main = 'Sepal Width & Length Distributions', xlab = 'Measurement', ylab = 'Variable', col = c('steelblue', 'coral2'), pch = 16, method = 'jitter')
Sama seperti pada contoh sebelumnya, kita dapat memilih untuk memplot diagram batang secara vertikal, bukan horizontal default:
stripchart(x, main = 'Sepal Width & Length Distributions',
xlab = 'Measurement',
ylab = 'Variable',
col = c('steelblue', 'coral2'),
pch = 16,
method = 'jitter',
vertical = TRUE )
Selain itu, kita dapat meneruskan rumus bentuk y~x ke dalam fungsi stripchart(), dengan y adalah vektor numerik yang dikelompokkan berdasarkan nilai x .
Misalnya, dalam kumpulan data iris , kita dapat mengelompokkan data berdasarkan spesies yang memiliki tiga nilai berbeda (“setosa”, “versicolor”, dan “virginica”) lalu memplot panjang sepal untuk setiap spesies dalam grafik batang:
stripchart(Sepal.Length ~ Species, data = iris, main = 'Sepal Length by Species', xlab = 'Species', ylab = 'Sepal Length', col = c('steelblue', 'coral2', 'purple'), pch = 16, method = 'jitter', vertical = TRUE)
Untuk melihat dokumentasi lengkap fungsi stripchart() di R, cukup ketik:
?stripchart