如何控制刻面ggplot2图的纵横比和比例？

Question

我想使用ggplot2在一列的行中分成三个图，如下图所示。

library(ggplot2)    
df <- data.frame(x=rep(1,3), y=rep(1,3), z=factor(letters[1:3]))
p <- ggplot(df, aes(x, y)) + geom_point() + facet_grid(z ~ .)
p

此输出存在两个问题。最重要的是，我想控制x和y轴的比例，在这种情况下使它们相同，即单个单位应在x和y轴上测量相同的距离。

第二个问题是刻面图的y轴碰撞标签。解决这个问题的奖励积分，但对比例/宽高比问题充分肯定。

Answer 1

我认为您正在寻找coord_fixed

library(ggplot2)    
df <- data.frame(x=rep(1,3), y=rep(1,3), z=factor(letters[1:3]))
p <- ggplot(df, aes(x, y)) + geom_point() + facet_grid(z ~ .)
p + coord_fixed(ratio=1)