Сортировать фаска по группам

Question

у меня есть кадр данных, который выглядит как этот

df <- data.frame(id=rep(c(1,5,2,6,4,3), each=5), 
       group=rep(c(1,2,2,2,1,1), each=5), 
       var1=runif(30)) 

теперь я хочу построить var1 с помощью ggplot и огранку сюжет по id, но сортировать грани по group (и id в group). Полагаю, что я должен сделать id фактором с уровнями, которые аккуратно сортируются по group, но я не могу понять, как это сделать элегантно.

Answer 1

# sort by group and id 
df_sorted <- df[with(df, order(group, id)), ] 
# reorder factor levels 
df_sorted$id <- factor(df_sorted$id, levels=unique(df_sorted$id)) 
# plot something 
ggplot(df_sorted, aes(var1)) + facet_wrap(~id) + geom_density()