ggplotでアスペクト比を修正するにはどうすればよいですか？

ドキュメントに合わせてプロットのサイズを変更しようとしていますが、プロットされた図を正方形にするのに問題があります。

例：

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

xとyの制限は同じですが、結果のプロットは正方形ではありません。Rは囲んでいるパネルを5x5 "にしていると思いますが、実際の図のサイズは気にしません。

ダイアグラムを押しつぶすにはどうすればよいですか？

ではggplot、あなたのプロットの縦横比を維持するための機構を追加することであるcoord_fixed()プロットにレイヤーを。これにより、実際の境界ボックスの形状に関係なく、プロット自体のアスペクト比が保持されます。

（またggsave、pdf(); print(p); dev.off()シーケンスではなく、結果のプロットをpdf / png / etcに保存するために使用することをお勧めします。）

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()

正方形などの特定のアスペクト比を確保するには、を使用しますtheme(aspect.ratio=1)。

アンドリーの答えは全体像を示していません。この例では、xの範囲がyの範囲に等しい不自然なデータが提供されている可能性があります。ただし、データが次の場合：

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

その場合、プロットは次のようになります。

coord_fixed（）関数には、軸の比率を調整するための引数もあります。

ratio y / xで表されるアスペクト比

プロットを次のように正方形にすることができます。

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

ただし、変数またはプロット領域の制限でこれを調整する必要があります（これらの例のように、すべての制限が整数でうまく分割できるわけではありません）。

完全を期すために：非常に異なる軸制限を考慮に入れたい場合：

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)

その結果：