使用非数字列手动排序数据框

Question

我有以下数据框架

    dd <- data.frame(b = c("High", "Medium", "Highest", "Low", "Not bad","Good", "V. Good"),
   x = c("C3", "C1", "C4", "N2", "C2", "N1","N4"), x = c("5", "2", "3", "6", "7", "5","7") )

所以我希望使用变量X的手动顺序转换数据框.

例如:那是原始的

1    High C3   5
2  Medium C1   2
3 Highest C4   3
4     Low N2   6
5 Not bad C2   7
6    Good N1   5
7 V. Good N4   7

但我想要的是一个新的数据框,基于X的值而不是按字母顺序开始,而是按照我选择的顺序随机开始,例如:

the first row has x=C1, the second have x=C2, the third have x=N4, ...etc

怎么做到这一点？

谢谢

Answer 1

由于x列是一个因素,您可以简单地确保其级别符合您的要求.

# New sorting order
desired_order <- sample(levels(dd$x))
# Re-order the levels
dd$x <- factor( as.character(dd$x), levels=desired_order )
# Re-order the data.frame
dd <- dd[order(dd$x),]