我有一个大数据框,其中有3000列和3000行,我需要对每5行加总,然后每5列求和,然后将我的数据框转换为600行和600列: 我的数据就是这样
matches1 matches2 matches3 matches4 matches5 ...
1 0 1 0 1
0 1 0 0 1
0 1 0 1 0
1 0 1 0 1
0 1 1 1 1
我的预期结果是: 我的前5行和5列的数据是这样的:
w1 ... w600
14
答案 0 :(得分:3)
我们可以使用segment.PricingDetailPerAdult
创建一个用于汇总行和列的索引,然后分别使用gl()
和aggregate
对行和列求和。
split.default
答案 1 :(得分:0)
我们可以使用%/%
index <- (seq_len(nrow(df)) - 1) %/% 5 + 1
然后,在aggregate
aggregate(.~ index, df, sum)[-1]
或者在rowsum
rowsum(df, group = index)
它也可以用于汇总列
sapply(split.default(df, index), rowSums)