数据帧的第n行和第n列之和

Question

我有一个大数据框，其中有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            

Answer 1

我们可以使用segment.PricingDetailPerAdult创建一个用于汇总行和列的索引，然后分别使用gl()和aggregate对行和列求和。

split.default

Answer 2

我们可以使用%/%

创建分组索引

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)