求助！如何筛选并处理重复的数据

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

求助如何把ID和RQ相同的行合并成新的一行，并且新的一行的Q=（Q1+Q2+...）, P=(P1*Q1+P2*Q2+...)/(Q1+Q2+...)
举例：

	ID	RQ	Q	P
1	2A01	20160731	16381.52	4.7319
2	2A01	20160731	6780.96	4.4876
3	2A01	20160801	14877.23	4.8041
4	2A01	20160801	13006.9	3.8637
5	2A01	20160801	44107.85	4.5341
6	2A01	20160802	15197.33	4.7577
7	2B01	20160805	7775.15	4.5772
8	2A01	20160805	50138.58	4.223

变成：

	ID	RQ	Q	P
1	2A01	20160731	23162.48	4.6604
2	2A01	20160801	71991.98	4.4688
3	2A01	20160802	15197.33	4.7577
4	2B01	20160805	7775.15	4.5772
5	2A01	20160805	50138.58	4.223

希望能给点思路！谢谢！
发帖例子.xlsx (10 KB)

2017-6-6 10:12:34 上传

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：行合并 如何

1. library(dplyr)
   
2. dt_new <- dt%>%
   
3.   
   
4.   group_by(ID, RQ) %>%
   
5.   mutate(
   
6.     Q = sum(Q),
   
7.     P = sum(P*Q)/sum(Q)
   
8.   )%>%
   
9.   distinct(ID, RQ, .keep_all=TRUE)

复制代码

yugao1986 发表于 2017-6-6 17:55

谢谢大神！