r语言怎么实现矩阵中每5列相加成新的列，最后合成一个新的矩阵 - 经管之家

› 论坛 › 数据科学与人工智能 › 数据分析与数据科学 › R语言论坛

r语言怎么实现矩阵中每5列相加成新的列，最后合成一个新的矩阵

3094

5

收藏 2021-03-29

如图，我需要让矩阵中的第1-第5列相加成、第6-第10列相加......最后并成一个新的矩阵，因为列数很多，我不想一次次的加，所以我之前考虑用for循环：
f <- for( i in seq(1,100,by=5)) {cbind(rowSums(wiot[1:2464 , i : i+5 ]))}
但是报错Error in rowSums(wiot[1:2464, i:i + 5]) : 'x'必需是阵列，而且至少得有两个维度
刚学习r，向大家来讨教，帮帮新人吧

附件列表

企业微信截图_16170209808073.png

原图尺寸 48.59 KB

二维码

扫码加我拉你入群

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

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

全部回复

2021-3-29 21:01:52

我发现这个代码可以
f1 <- sapply(seq(1,100, by=5), function(i) {
indx <- i:(i+4)
rowSums(wiot[indx[indx <= 100]])})

二维码

扫码加我拉你入群

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

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

2021-3-30 00:29:34

做了个示例，你参考。

复制代码

二维码

扫码加我拉你入群

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

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

2021-3-30 02:03:25

我是你的话，可能会转置一下行列，然后用向量化的方式去求和。

复制代码

二维码

扫码加我拉你入群

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

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

七年浅学经济

2021-9-13 22:08:51

是用来合并wiot中各国最终消费里的小项吗？

二维码

扫码加我拉你入群

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

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

2021-9-16 22:39:23

我也贡献思路：

复制代码

二维码

扫码加我拉你入群

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

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

相关推荐

栏目导航

热门文章

推荐文章

扫码加好友，拉您进群

各岗位、行业、专业交流群