我有数据框,我想通过每个 ID 和组的总和创建一个新变量,如果我正常求和,数据维度减少,我的情况需要保留并重复每一行。
ID <- c(rep(1,3), rep(3, 5), rep(4,4))
Group <-c(1,1,2,1,1,1,2,2,1,1,1,2)
x <- c(1:12)
y<- c(12:23)
df <- data.frame(ID,Group,x,y)
ID Group x y
1 1 1 1 12
2 1 1 2 13
3 1 2 3 14
4 3 1 4 15
5 3 1 5 16
6 3 1 6 17
7 3 2 7 18
8 3 2 8 19
9 4 1 9 20
10 4 1 10 21
11 4 1 11 22
12 4 2 12 23
输出还有 2 个变量“sumx”和“sumy”。按(ID,组)分组
ID Group x y sumx sumy
1 1 1 1 12 3 25
2 1 1 2 13 3 25
3 1 2 3 14 3 14
4 3 1 4 15 15 48
5 3 1 5 16 15 48
6 3 1 6 17 15 48
7 3 2 7 18 15 37
8 3 2 8 19 15 37
9 4 1 9 20 30 63
10 4 1 10 21 30 63
11 4 1 11 22 30 63
12 4 2 12 23 12 23
有什么想法吗?
最佳答案
只要:
df$sumx <- with(df,ave(x,ID,Group,FUN = sum))
df$sumy <- with(df,ave(y,ID,Group,FUN = sum))
https://stackoverflow.com/questions/38690042/
相关文章:
rx-java - 在 RxJava 中将 Observable 转换为 Collection
file - 在同一区域将大文件从 S3 下载到 EC2 的最快方法是什么?
elixir - 为什么 is_atom(nil) 在 elixir 中等于 true?
node.js - 应用程序使用(验证器()); ^ 类型错误 : validator is not
python - 从 Tkinter Tcl 回调到 python 函数在 Windows 中崩溃
c - 根据 AMD64 ABI,什么样的 C11 数据类型是数组