有趣的R语言方阵均值抽样函数

for(i in 1:227){
  for(j in 1:8){
    a<--1*(i+1);
    z1<-z1[a,]
    z1<-z1[,a]
  }
}

这个函数实现的功能是将方阵中的间隔行列移除，以此代码行向量为例，第一次移除2-9行后，第10行自动称为第2行，之后第二次移除就是3-10行，直到完成227次移除为止。当i=1时，内部j循环始终是移除第二行第二列，第三行第三列自动替补，移除8行8列后，i=2,内部j循环始终是移除第3行第3列，第四行第四列自动替补，