[求助如何相加

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

upc	units	predunits
00023565_00000	5	3.167247686
00023565_00000	2	2.754306168
00023565_00000	5	2.933269615
00023565_00000	2	2.845960779
00023565_00000	2	2.710191349
00023565_00000	4	2.700256256
00023565_00000	1	2.556785361
00023565_00000	1	3.793042998
00023565_00000	2	2.896847018
00023565_00000	3	2.735144726
00023565_00000	2	2.632329926
00023565_00000	1	2.688230219
00023588_00000	0	0.982834102
00023588_00000	1	0.954649061
00023588_00000	3	0.943758541
00023588_00000	0	0.892416547
00023588_00000	2	1.065379472
00023588_00000	1	1.000341952
00023588_00000	2	0.945928924
00023588_00000	1	1.115783561
00023588_00000	4	1.228224748
00023588_00000	1	0.885648264
00023588_00000	0	0.884099957
00023588_00000	0	0.881275891
00023588_00000	3	0.88015167

像这样的excel表怎么把第一列数字相等的predunits，相加，比如upc =00023565_00000，则把第3列的3.167247686+2.75430+.....+2.688230219

[此贴子已经被作者于2008-4-2 15:30:46编辑过]

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：Excel表 Units EXCEL Unit Pred 求助 相加

假定你的数据存在 data.frame 中，并且名称为 abc
a <- unique(abc$upc)
n <- length(a)

for (i in 1:n) {
    tmp <- sum(subset(abc, upc == a)$predunits)
    print(tmp)
}

当然，我对 R 不熟悉，只能想到这个解决办法

apply(abc,1,sum,trim=0.001)

最好看一下，帮助里面apply和tapply的用法，和stata里group是一样的