我想用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 转换为具有我想要的顺序的因子级别的因子，但在这种情况下，这可能是不可能的 . 谁有任何想法如何做到这一点？ :)
1 回答
只需将轴标签设置为与具有命名字符向量的实际中断不同：