Когда используешьfacet_grid(x ~ y) с ggplot2 я видел в различных примерах и прочитал в документации, чтоx переменная расположена вертикально, аy переменная по горизонтали. Тем не менее, когда я запускаю следующее:

set.seed(1)
b = c(rnorm(10000,mean=0,sd=0.5),rnorm(10000,mean=5,sd=0.5),
      rnorm(10000,mean=7,sd=0.5),rnorm(10000,mean=10,sd=0.5))
x = c(rep('xL', 20000), rep('xR',20000))
y = c(rep('yL',10000), rep('yR',20000), rep('yL',10000))
foo = data.frame(x=x,y=y,b=b)

ggplot(data=foo, aes(foo$b)) + 
  geom_histogram(aes(y=..density..),breaks=seq(-5,12,by=.2),col='steelblue',fill='steelblue2') + 
  geom_density(col='black') + 
  facet_grid(x ~ y, scales='free_y')

Я получаю ниже (извините за качество). И даже несмотря на то, что сверху, распределение со средним 10 - это распределение с (x, y) «xR, xL», которое появляется в нижнем правом квадранте с метками «xR, yR». Что я делаю неправильно?