按组对变量求和并附加结果

问题描述

Dataset HAVE 是来自Recess 字符的电话数据的tibble edgelist:

Dataset HAVE is a tibble edgelist of phone call data from the characters of Recess:

Student   Friend       nCalls
TJ        Spinelli          3
TJ        Gretchen          7
TJ        Gus               6
TJ        Vince             8
TJ        King Bob          1
TJ        Mikey             2
Spinelli  TJ                3
Spinelli  Vince             2
Randall   Ms. Finster      17

数据集 NEED 包括来自 HAVE 的所有原始列，但包括一个新变量 nCallsPerStudent，这听起来就像:>

Dataset NEED includes all original columns from HAVE but includes a new variable, nCallsPerStudent, that is exactly what it sounds like:

Student   Friend       nCalls   nCallsPerStudent
TJ        Spinelli          3                 27
TJ        Gretchen          7                 27
TJ        Gus               6                 27
TJ        Vince             8                 27
TJ        King Bob          1                 27
TJ        Mikey             2                 27
Spinelli  TJ                3                  5
Spinelli  Vince             2                  5
Randall   Ms. Finster      17                 17

我如何从 HAVE 到 NEED?

推荐答案

我们可以通过'student'和mutate分组来创建新列

We can group by 'student' and mutate to create the new column

library(dplyr)
df %>%
  group_by(Student) %>%
  mutate(nCallsPerStudent = sum(nCalls))

或者使用base R

df$nCallsPerStudent <- with(df, ave(nCalls, Student, FUN = sum))

这篇关于按组对变量求和并附加结果的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！