Dalam contoh di bawah ini, distribusi variabel mpg akan diperiksa dengan menggunakan R dan ggplot2.

library(ggplot2)
# Solution 1
qplot(sample = mpg, data = mtcars)
# Solution 2
ggplot(mtcars, aes(sample=mpg))+stat_qq()

Ganti Bentuk Point di Qq Plot

Dalam R code di bawah ini, bentuk point di qq plot dapat diubah secara otomatis dengan menggunakan variabel cyl. Anda juga dapat mengatur bentuk point manual dengan fungsi scale_shape_manual().

# Ganti bentuk point by groups
p <- qplot(sample = mpg, data = mtcars, shape=cyl)
p
# Ganti bentuk point manual
p + scale_shape_manual(values=c(1,17,19))

Ganti Warna Point di Qq Plot

Dalam R code di bawah ini, warna point di qq plot dapat diubah secara otomatis dengan menggunakan level-level cyl.

# Ganti warna point by groups
p <- qplot(sample = mpg, data = mtcars, color=cyl)
p

Anda juga dapat mengubah manual warna point dengan fungsi :

• scale_color_manual(): untuk menggunakan warna custom
• scale_color_brewer(): untuk menggunakan palette warna dari RColorBrewer package
• scale_color_grey(): untuk menggunakan skala warna abu-abu

Contoh penggunaan fungsi di atas:

# Gunakan palette warna custom
p+scale_color_manual(values=c("#999999", "#E69F00", "#56B4E9"))
# Gunakan palette warna brewer
p+scale_color_brewer(palette="Dark2")
# Gunakan skala warna abu-abu
p + scale_color_grey() + theme_classic()

Ganti Posisi Legend

Dalam R code di bawah ini, posisi legend dapat diubah dengan menggunakan tema theme().

p + theme(legend.position="top")
p + theme(legend.position="bottom")
p + theme(legend.position="none") # Hilangkan legend

Nilai yang diperbolehkan untuk argument legend.position adalah : “left”, “top”, “right”, “bottom”.

Qq Plot yang Dikustom

Contoh qq plot dasar:

# Qq plot dasar
qplot(sample = mpg, data = mtcars)+
labs(title="Miles per gallon \n according to the weight",
 y = "Miles/(US) gallon")+
theme_classic()

Ganti warna/shape by groups:

p <- qplot(sample = mpg, data = mtcars, color=cyl, shape=cyl)+
labs(title="Miles per gallon \n according to the weight",
 y = "Miles/(US) gallon")
p + theme_classic()

Ganti warna manual:

• Warna kontinu:

p + scale_color_brewer(palette="Blues") + theme_classic()

• Warna diskret:

p + scale_color_brewer(palette="Dark2") + theme_minimal()

• Warna gradient:

p + scale_color_brewer(palette="RdBu")

Informasi

Analisis ini telah dilakukan menggunakan software R (ver. 3.1.2) dan ggplot2 (ver. 1.0.0).

Terima kasih!

Jika Anda menikmati artikel ini, saya sangat berterima kasih jika Anda dapat membantu menyebarkannya dengan mengirimkan ke teman atau membagikan di Twitter, Facebook, atau Linked In.

Tunjukkan cinta dengan tombol like di bawah… Terima kasih dan jangan lupa untuk sharing dan menulis komentar di bawah!