可使用aggregate函数
如：
|
1
|
aggregate(.~ID,data=这个数据框名字，mean)
|
如果是对数据框分组，组内有重复的项，对于重复项保留最后一行数据用：
|
1
2
3
|
pcm_df$duplicated <- duplicated(paste(pcm_df$OUT_MAT_NO, pcm_df$Posit, sep = "_"), fromLast = TRUE)
pcm_df <- subset(pcm_df, !duplicated)
pcm_df$duplicated <- NULL
|
补充：R语言分组求和，分组求平均值，分组计数
我们经常可能需要把一个数据按照某一属性分组，然后计算一些统计值。在R语言里面，aggregate函数就可以办到。
|
1
2
|
## S3 method for class 'data.frame'
aggregate(x, by, FUN, ..., simplify = TRUE, drop = TRUE)
|
我们常用到的参数是：x, by, FUN。
x, 你想要计算的属性或者列。
by, 是一个list，可以指定一个或者多个列作为分组的基础。
FUN, 指定一个函数，用来计算，可以作用在所有分组的数据上面。
假如这个是我们的数据。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
type<-c("a","b","c","a","c","d","b","a","c","b")
value<-c(53,15,8,99,76,22,46,56,34,54)
df<-data.frame(type,value)
df
type value
1 a 53
2 b 15
3 c 8
4 a 99
5 c 76
6 d 22
7 b 46
8 a 56
9 c 34
10 b 54
|
分组求和
|
1
2
3
4
5
6
|
aggregate(df$value, by=list(type=df$type),sum)
type x
1 a 208
2 b 115
3 c 118
4 d 22
|
分组求平均值
分组求平均很简单，只要将上面的sum改成mean就可以了。
|
1
2
3
4
5
6
|
aggregate(df$value, by=list(type=df$type),mean)
type x
1 a 69.33333
2 b 38.33333
3 c 39.33333
4 d 22.00000
|
分组计数
分组计数就是在分组的情况下统计rows的数目。
|
1
2
3
4
5
6
|
aggregate(df$value, by=list(type=df$type),length)
type x
1 a 3
2 b 3
3 c 3
4 d 1
|
基于多个属性分组求和。
我们在原有的数据上加上一列，可以看看多属性分组。
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
type_2 <-c("F","M","M","F","F","M","M","F","M","M")
df <- data.frame(df, type_2)
df
type value type_2
1 a 53 F
2 b 15 M
3 c 8 M
4 a 99 F
5 c 76 F
6 d 22 M
7 b 46 M
8 a 56 F
9 c 34 M
10 b 54 M
aggregate(x=df$value, by=list(df$type,df$type_2),sum)
Group.1 Group.2 x
1 a F 208
2 c F 76
3 b M 115
4 c M 42
5 d M 22
|
以上为个人经验，希望能给大家一个参考，也希望大家多多支持服务器之家。如有错误或未考虑完全的地方，望不吝赐教。
原文链接：https://blog.csdn.net/faith_mo_blog/article/details/50738645