Bagaimana cara memperbaiki rasio aspek di ggplot?

Saya mencoba mengubah ukuran plot agar sesuai dengan dokumen saya, tetapi saya mengalami kesulitan membuat diagram plot menjadi persegi.

Contoh:

pdf(file = "./out.pdf", width = 5, height = 5)
p <- ggplot(mydata, aes(x = col1, y = col2))
print(p)
aux <- dev.off()

Meskipun batasan untuk x dan y sama, plot pada hasilnya bukanlah persegi. Saya rasa R membuat panel penutup 5x5 "tetapi tidak peduli dengan ukuran diagram sebenarnya.

Bagaimana saya bisa membatalkan diagram saya?

r ggplot2

— htorque.dll
sumber

Jawaban:

115

Dalam ggplotmekanisme untuk mempertahankan rasio aspek plot Anda adalah menambahkan coord_fixed()lapisan untuk plot. Ini akan mempertahankan rasio aspek plot itu sendiri, apa pun bentuk kotak pembatas yang sebenarnya.

(Saya juga menyarankan Anda menggunakan ggsaveuntuk menyimpan plot yang Anda hasilkan ke pdf / png / etc, daripada pdf(); print(p); dev.off()urutannya.)

library(ggplot2)
df <- data.frame(
    x = runif(100, 0, 5),
    y = runif(100, 0, 5))

ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed()

masukkan deskripsi gambar di sini

— Andrie
sumber

Tahukah Anda mengapa ggplot bersikeras untuk meletakkan label sumbu y di sebelah kiri? Saya ingin tahu bagaimana mencegahnya ...

— Mengejar

@chase Solusi kludgy adalah mengubah hjustposisi judul - coba opts(axis.title.y=theme_text(hjust=10)). Tapi sayangnya, sepertinya tidak. Lihat groups.google.com/group/ggplot2/browse_thread/thread/… untuk diskusi milis ggplot dan jawaban @ Baptiste.

— Andrie

Perilaku itu diperbaiki dalam versi pengembangan.

— hadley

Dengan judul pertanyaan yang lebih umum, dapatkah Anda juga menambahkan informasi tentang cara menghitung rasio (argumen untuk coord_fixed) mengingat tidak menggunakan batas yang sama pada kedua sumbu?

— htorque

Lebih lanjut untuk komentar @ htorque; jika y malah didefinisikan y=runif(100, 0, 50)maka aspek plot tidak lagi persegi. coord_fixed()menyebabkan skala setiap sumbu menjadi sama hanya yang terlihat?

— ben yang berbeda

Untuk memastikan rasio aspek tertentu, misalnya untuk persegi, gunakan theme(aspect.ratio=1) .

Jawaban Andrie tidak memberikan gambaran yang lengkap, karena pada contoh tersebut terdapat data yang mungkin tidak wajar dimana range x sama dengan range y. Namun jika datanya:

df <- data.frame(
  x = runif(100, 0, 50),
  y = runif(100, 0, 5))
ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed()

maka plotnya akan terlihat seperti ini:

masukkan deskripsi gambar di sini

Fungsi coord_fixed () juga memiliki argumen untuk menyesuaikan rasio sumbu:

ratio rasio aspek, dinyatakan sebagai y / x

Sehingga plot bisa dibuat persegi dengan:

ggplot(df, aes(x=x, y=y)) + geom_point() + coord_fixed(ratio=10)

masukkan deskripsi gambar di sini

Tetapi Anda perlu menyesuaikan ini dengan batas variabel atau area plot (tidak semua batas dapat dibagi dengan baik dengan bilangan bulat seperti contoh ini).

— ben yang berbeda
sumber

Demi kelengkapan: Jika Anda ingin mempertimbangkan batas sumbu yang sangat berbeda:

df <- data.frame(
  x = runif(100, 0, 5000),
  y = runif(100, 0, 5))
ratio.display <- 4/3
ratio.values <- (max(df$x)-min(df$x))/(max(df$y)-min(df$y))
plot <- ggplot(df, aes(x=x, y=y)) + geom_point()
plot + coord_fixed(ratio.values / ratio.display)

Yang menghasilkan:

— Graipher
sumber

bagaimana itu lebih baik dari plot + theme(aspect.ratio=4/3)? Ggplot mungkin memiliki beberapa lapisan, dengan beberapa kumpulan data, dan sumbu mungkin memiliki faktor perluasan yang berubah-ubah, jadi menghitung rasio y / x dari satu sumber data tampaknya cukup rapuh.

— baptiste

Karena ini rupanya tidak mudah ditemukan. Yang dibuktikan dengan adanya tiga jawaban di sini, tetapi tidak ada yang menyebutkannya. Anda harus memasukkannya ke dalam jawaban, ini pasti solusi yang lebih baik.

— Graipher