实现分组计算

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

各位好，我有一个数据框df， ，分组计算y中元素在对应的x组中的比值，效果如：

1. df<-data.frame(Date=c("May","June","July","May","June","May","June","July","Aug"),
   
2.                x=c(rep("A",3),rep("B",2),rep("C",4)),
   
3.                y=c(4,2,3,4,6,4,2,3,2))
   
4. df
   
5. df2<-df%>%group_by(x)%>%summarise_each(funs('z'=sum),y)
   
6. df3<-df%>%left_join(df2)%>%mutate(ratio=y/z)
   
7. df3

复制代码

感觉我的代码好麻烦啊，请问有没有简单一点的方法呢？谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

df%>%group_by(x) %>% mutate(ratio=y/sum(y))

5752 发表于 2020-1-14 11:08
df%>%group_by(x) %>% mutate(ratio=y/sum(y))

谢谢，但您算的是y中各数值占总和的比例，但我想算的是数值在各个分组中的比例……

千车麦穗 发表于 2020-1-14 11:40
谢谢，但您算的是y中各数值占总和的比例，但我想算的是数值在各个分组中的比例……

不明白你的意思

二楼正解

千车麦穗 发表于 2020-1-14 11:40
谢谢，但您算的是y中各数值占总和的比例，但我想算的是数值在各个分组中的比例……

df%>%group_by(x) %>% mutate(ratio=y/sum(y))是对的，你好好验算

千车麦穗 发表于 2020-1-14 11:40
谢谢，但您算的是y中各数值占总和的比例，但我想算的是数值在各个分组中的比例……

df%>%group_by(x) %>% mutate(ratio=y/sum(y))是对的，你好好验算

千车麦穗 发表于 2020-1-14 11:40
谢谢，但您算的是y中各数值占总和的比例，但我想算的是数值在各个分组中的比例……

df%>%group_by(x) %>% mutate(ratio=y/sum(y))是对的，你好好验算

5752 发表于 2020-1-14 12:44
不明白你的意思

您好，我想达到的效果是红框内的比值加起来等于1，是第三列在各自分组中的比值。 而您的代码运行结果是总的比值加起来为1.

谢谢各位老师，二楼的好用！我重新安装了一遍dplyr包就好用了