如何根据另一个类别对因子水平进行排序？

Question

假设我有一个包含两个因素的数据框，我想对按第二类分组的一个因素的水平进行排序。

name <- letters[1:8]
category <- factor(sample(1:2, 8, replace=T), labels=c("A", "B"))
my.df <- data.frame(name=name, category=category)

因此，数据框看起来类似于：

  name category
1    a        A
2    b        A
3    c        B
4    d        B
5    e        B
6    f        A
7    g        A
8    h        A

并且 levels(my.df$name) 的输出为：

[1] "a" "b" "c" "d" "e" "f" "g" "h"

假设 name 中的级别始终对应于 name 中的同一级别code>category 在我的数据中，如何相应地对名称级别进行排序？

Answer 1

这是你想要的吗？

> levels(my.df$name) <- as.character(unique(my.df[order(my.df$category),]$name))
> levels(my.df$name)
[1] "b" "c" "e" "f" "a" "d" "g" "h"

Answer 2

我认为这可能比迄今为止的任何一个解决方案都更清晰：

    my.df <-
structure(list(name = structure(1:8, .Label = c("a", "b", "c", 
"d", "e", "f", "g", "h"), class = "factor"), category = structure(c(1L, 
1L, 2L, 2L, 2L, 1L, 1L, 1L), .Label = c("A", "B"), class = "factor")), .Names = c("name", 
"category"), class = "data.frame", row.names = c("1", "2", "3", 
"4", "5", "6", "7", "8"))

 with(my.df, name[order(category)] )
[1] b d e h a c f g
Levels: a b c d e f g h

如果您想重新调整该因素，也可以这样做，但尚不清楚您是否希望这种更改是永久性的。