在 R 中，如何访问因子每个级别的第一个元素？

我有一个像这样的数据框：

n = c(2, 2, 3, 3, 4, 4) 
n <- as.factor(n)
s = c("a", "b", "c", "d", "e", "f") 
df = data.frame(n, s)  

df
  n s
1 2 a
2 2 b
3 3 c
4 3 d
5 4 e
6 4 f

我想访问我的因子每个级别的第一个元素（并且在本例中有一个包含a, c, e).

可以达到一个级别的第一个元素，

df$s[df$n == 2][1]

但它并不适用于所有级别：

df$s[df$n == levels(n)]
[1] a f

你会怎么做？

更进一步，我想修改我的数据框，看看哪个是每次出现时每个级别的第一个元素。在我的示例中，新列应该是：

  n s rep firstelement
1 2 a   a            a
2 2 b   c            a
3 3 c   e            c
4 3 d   a            c
5 4 e   c            e
6 4 f   e            e

Edit。我的答案的第一部分解决了original问题，即before“并走得更远”（这是由OP在编辑中添加的）。

另一种可能性，使用duplicated. From ?duplicated: "duplicated()确定向量或数据帧的哪些元素是具有较小下标的元素的重复项。”

这里我们使用!，逻辑非 (NOT)，用于选择not“n”的重复元素，即“n”每个级别的第一个元素。

df[!duplicated(df$n), ]
#   n s
# 1 2 a
# 3 3 c
# 5 4 e

Update直到现在才看到您的“并进一步”编辑。我的第一个建议肯定是使用ave，正如 @thelatemail 和 @sparrow 已经提议的那样。但为了深入研究 R 工具箱并向您展示另一种选择，这里有一个dplyr way:

对数据进行分组n， 使用mutate函数创建一个新变量“first”，其值为“s的第一个元素”(s[1]),

library(dplyr)

df %.%
  group_by(n) %.%
  mutate(
    first = s[1])
#   n s first
# 1 2 a     a
# 2 2 b     a
# 3 3 c     c
# 4 3 d     c
# 5 4 e     e
# 6 4 f     e

或者全力以赴dplyr便利功能及使用first代替[1]:

df %.%
  group_by(n) %.%
  mutate(
    first = first(s))

A dplyr您原来问题的解决方案是使用summarise:

df %.%
  group_by(n) %.%
  summarise(
    first = first(s))

#   n first
# 1 2     a
# 2 3     c
# 3 4     e