R中如何实现对不同处理的重复值求平均数

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

求教，有一组数据是两个品种2个处理，但每个处理有2个重复，现在要对每个处理的重复求均值，应该如何做呀
品种  处理  重复  变量
A        a        1
                    2
          b        1
                    2
B        a        1
                    2
          b        1
                    2
                     

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：如何实现 求平均 平均数 重复值 如何 平均数 品种

求助！

1. pinzhong <- rep(c("A","B"),each=4)
   
2. chuli <- rep(rep(c("a","b"),each=2),2)
   
3. chongfu <- rep(1:2,4)
   
4. df <- data.frame(pinzhong,chuli,chongfu)
   
5. # 拆分品种
   
6. zz <- split(df,df$pinzhong)
   
7. gmean <- function(x){
   
8. tapply(x$chongfu,x$chuli,mean)
   
9. }
   
10. # 这两种随便你选择
    
11. sapply(zz,gmean)
    
12. t(sapply(zz,gmean))

复制代码

jiangbeilu 发表于 2016-5-18 10:06

对一个数据框，请问我删掉一行后，如何把这一行的序号补齐呢

你不用删除，用x[-1,]就代表不选择第一行，然后，这个结果还是显示在xx数据框里的行号

1. xx <- data.frame(x=1:5,y=2:6)
   
2. 
   
3. xx[-1,]

复制代码

可是我想实现直接把第一行删除，然后后面的数据自动补位，原来的第二行变成第一行，一次类推，应该怎么做呢