循环到通过矩阵答案

【问题标题】：Loop to through matrix循环到通过矩阵
【发布时间】：2018-05-29 07:50:37
【问题描述】：

我有一个 256*256 的矩阵，我需要打破这个矩阵以获得 1024 个块 (256*256/(8*8))。然后我需要计算每个块（1024块）的均值、标准差、峰度、标准差

我想从矩阵中得到的数据集是

S.no 平均标准偏差峰度偏度 1 2 . . . . 1024

我陷入了循环和检索值以计算统计信息的过程中。

【问题讨论】：

听起来是个挑战。你到底卡在哪里了？你能告诉我们你的代码吗？另请阅读 - How do I ask a good question? 和 How to make a great R reproducible example?
可能重复：Function to split a matrix into sub-matrices in R
是的，当然...我已经将图像转换为 256*256 的矩阵。首先我试图计算平均值，我收到错误，下面是代码。 y
matsplitter
@PraveenChougale 请将您的 cmets 的其他信息放入您的问题中，即编辑您的问题： stackoverflow.com/posts/50579071/edit

标签： r

【解决方案1】：

m 是您的矩阵。 yourMatrixFunction 是一个你需要定义的函数，它在单个 8x8-matrix 上工作并获得你想要的。

m <- matrix(1,nrow=256,ncol=256)

first <- seq(1,256,by=8)
last  <- rep(8,length(first)) %>% cumsum

pair  <- Map(function(...)cbind(...),first,last) %>% expand.grid(.,.)
first <- pair[[1]]
last  <- pair[[2]]

all_m <- Map(function(x,y) m[x[1]:x[2],y[1]:y[2]],x=first,y=last)

lapply(all_m,yourMatrixFunction)

【讨论】：