ファセットでのgeom_rectの使用

Question

ファセットに使用される変数の組み合わせについてアンバランスな観測値を持つfacet_gridをプロットしたいと思います。

dat <- data.frame(x = 1:6, 
        y = 0:5, 
        group = rep(c("A", "B"), each = 3), 
        var = rep(c("a", "a", "b"), times = 2)) 

> dat 
    group var x y 
1  A a 1 0 
2  A a 2 1 
3  A b 3 2 
4  B a 4 3 
5  B a 5 4 
6  B b 6 5 

..そして、それぞれの面で同じでなければならないgeom_rectを追加します。

ggplot(dat) + 
    geom_rect(xmin = -Inf, xmax = Inf, ymin = -Inf, ymax = 3, fill = "red", alpha = .3) + 
    geom_point(aes(x = x, y = y)) + 
    facet_grid(group~var) 

しかし、いくつかのgeom_rect sは、私は全くaes()を使用していないにも関わらず、互いの上にプロットされているかのように思えます。どのように私はそれが各面で同じように見えるようにすることができますか？

Answer 1

実際に矩形をプロットするためのデータを使用していないので、後でannotateを使用してデータやファセットに結びつけないようにしてください。例えば

あるいは

ggplot(dat) + 
    annotate("rect", xmin = -Inf, xmax = Inf, ymin = -Inf, ymax = 3, fill = "red", alpha = .3) + 
    geom_point(aes(x = x, y = y)) + 
    facet_grid(group~var) 

Answer 2

、geom_raster層への供給データ：

ggplot(dat) + 
    geom_rect(aes_all(vars = c('xmin', 'xmax', 'ymin', 'ymax')), fill = "red", alpha = .3, 
      data.frame(xmin = -Inf, xmax = Inf, ymin = -Inf, ymax = 3)) + 
    geom_point(aes(x = x, y = y)) + 
    facet_grid(group~var)