r - ggplot2rのx軸に比例するさまざまなサイズのファセット

Question

以下は状況です：

group1 <- seq(1, 10, 2)
group2 <-  seq(1, 20, 3)
x = c(group1, group2)
mydf <- data.frame (X =x , Y = rnorm (length (x),5,1), 
 groups = c(rep(1, length (group1)), rep(2, length(group2))))

ggplot(mydf, aes(X, Y, group= groups)) + geom_point()+ facet_grid (.~ group)

次のプロットでは、さまざまなファセットがx制限によってスケーリングされています。

 ggplot(mydf, aes(X, Y, group= groups)) + geom_point()+ 
   facet_grid (.~ group, scales = "free_x")

xの全幅には意味があるので、スケールだけでなく幅の違うファセットを作りたいです。したがって、予想されるファセット1の幅は2の半分のサイズになります。

Answer 1

私があなたのことを正しく理解していれば、 で space = "free_x"あなたが望むことをしますfacet_grid。私の知る限りfacet_wrap、スペース引数をサポートしたことはありませんが、多くのfacet_wrapコマンドをコマンドとしてキャストできfacet_gridます。

library(ggplot2)

ggplot(mydf, aes(X, Y)) + geom_point()+ 
facet_grid (.~ groups, scales = "free_x", space = "free_x")

また、x 軸に同じスタイルのラベリングが必要な場合は、次のようにします。

ggplot(mydf, aes(X, Y)) + geom_point()+ 
 scale_x_continuous(breaks = seq(0,20,2)) +
 facet_grid (.~ groups, scales = "free_x", space = "free_x")