r - ファセットを完全に正方形にするにはどうすればよいですか?

Question

ファセットのプロットを作成するために、ggplot で facet_wrap を使用しています。私の問題は、ファセットが常に非常に短く、非常に広い長方形のように見えることですが、理解しやすいように正方形にしたいのです。理想的には、必要な列の数を指定し、すべてのファセットが正方形になるようにプロットの高さを ggplot に把握させたいと考えています。これは可能ですか？

Answer 1

たぶんaspect.ratio役立つ：

df <- data.frame(x = runif(100, 0,10), y = runif(100, 0, 50), z=gl(4,25))
ggplot(df, aes(x, y)) + 
  geom_point() + 
  facet_wrap(~ z, ncol = 4) + 
  theme(aspect.ratio = 1) # try with and without

Answer 2

私は lukeA とは少し違う質問を理解しました。プロットをできるだけ「正方形」に近い次元でnxmの方法で配置したいと思っていました。

ggplot(df, aes(x, y)) + 
  geom_point() + 
  facet_wrap(~ z, ncol = sqrt(length(levels(df$z))) )

Answer 3

g = ggplotGrob(p)
g$respect = TRUE
require(grid)
grid.draw(g)