ggplot facet_wrap，每个方面都有特定的变量顺序

Question

我想用ggplot绘制这些数据：

library(ggplot2)
set.seed(0)
df <- data.frame(
  var1 = rep(c("group1", "group2"), each = 3),
  var2 = rep(letters[1:3], 2),
  value = runif(6, 0, 10)
)

情节应该像这样：

pl <- ggplot(df, aes(var2, value))
pl <- pl + geom_col()
pl <- pl + facet_wrap(~ var1, scales = "free")
pl

x轴上var2的顺序应该通过增加value的顺序来确定。我可以做到这一点：

df$temp_var <- paste(df$var1, df$var2)
pl <- ggplot(df, aes(reorder(temp_var, value), value))
pl <- pl + geom_col()
pl <- pl + facet_wrap(~ var1, scales = "free")
pl

但是，x轴标签应为a，b和c。通常情况下，我会将var2转换为具有我想要的顺序的因子级别的因子，但在这种情况下，这可能是不可能的。 谁有任何想法如何做到这一点？ ：）

Answer 1

只需将轴标签设置为与具有命名字符向量的实际中断不同：

pl + scale_x_discrete(labels = setNames(as.character(df$var2), df$temp_var))