Как упорядочить столбец моего фрейма данных по другой переменной?

Question

У меня есть многогранный гистограмма, и я хочу создать гистограмму с растущими / убывающими столбцами, и: я бы хотел, чтобы ось x (x2) для каждого фасета была независимой, в соответствии с другой переменной (nbr).

Пример моих данных:

i <- data.frame(

x1=c(0.01, 0.01, 0.02, 0.01, 0.01, 0.01, 0.01, 0.01, 0.01, 0.01, 0.42,
     0.35, 0.43, 0.31, 0.34, 0.41, 0.34, 0.34, 0.42, 0.39, 0.44, 0.43,
   0.49, 0.43, 0.42, 0.53, 0.41, 0.42, 0.5, 0.4, 0.53, 0.58, 0.57,
    0.55, 0.51, 0.65, 0.51, 0.52, 0.62, 0.49, 0.01, 0.02, 0.04, 0.02,
    0.01, 0.12, 0.01, 0.01, 0.02, 0.01, 0.65, 0.75, 0.72, 0.68, 0.65,
     0.77, 0.64, 0.67, 0.77, 0.69),
nbr =c(15.18 ,11.53 ,13.37 ,9.2, 10.9, 12.23 ,9.53, 9.81, 7.86, 12.79,
 22.03 ,17.64 ,18.1, 16.78 ,17.53 ,16.97 ,17.76 ,18.35 ,12.82 ,20.91,
 22.09 ,19.18 ,17.54 ,18.45 ,19.83 ,16.99 ,19.69 ,19.45 ,13.07 ,21.41,
 12.13 ,9.76, 10.79 ,10.74 ,12.43 ,9.65, 12.18 ,11.63 ,6.74, 12.31,
 17.5, 14.75 ,15.2, 13.89 ,15.24 ,17.43 ,15.22 ,14.04,9.49, 15.86,
 8.09, 5.86, 6.68, 7.34, 8.01, 6.35, 8.4, 7.4, 3.88, 6.92 ),
x2=rep(c("a",  "b",   "c",  "d", "e", "f", "g", "h", "i", "j"),6),
s = c(rep(c(rep(c("3"),10),
                    rep(c("4"),10),
                    rep(c("5"),10),
                    rep(c("6"),10),
                    rep(c("7"),10),
                    rep(c("8"),10)),1)))

Гистограмма:

я пытался: я <- преобразование (я, х2 = переупорядочить (х2, нбр))

    x1   nbr x2 s
1  0.01 15.18  a 3
2  0.01 11.53  b 3
3  0.02 13.37  c 3
4  0.01  9.20  d 3
5  0.01 10.90  e 3
6  0.01 12.23  f 3
7  0.01  9.53  g 3
8  0.01  9.81  h 3
9  0.01  7.86  i 3
10 0.01 12.79  j 3
11 0.42 22.03  a 4
12 0.35 17.64  b 4
13 0.43 18.10  c 4