从多嵌套的for循环中断到最外层的栅格

Question

我有一个多嵌套的for循环，一旦最后一个嵌套(这里是clip.groups)完成，我需要重新启动整个循环。我试过几种方法。每一层都涉及到栅格，我不能通过应用等将其矢量化。因为有这么多的输入文件，所以它是不可复制的。

但基本结构是这样的：

clip.groups <- c('Bay area','Alameda County','Oakland','West and Downtown Oakland')
rate.groups <- c('co.25','cbg.25')
conc.groups <- c('ppb', 'ug')
pop.groups <- c('pop.ls.night.25')
beta.groups <- c(0.001105454,0.000318195,0.001881231)

for (j in 1:length(conc.groups)){
  for (i in 1:length(beta.groups)){
    for (k in 1:length(rate.groups)){
      for (h in 1:length(pop.groups)){
        for (m in 1:length(clip.groups)){
              break #==== THIS IS WHERE I NEED IT TO GO BACK TO THE OUTER MOST LOOP - (conc.groups j)  
            }
          }
        }
      }
    }
  }
}

Answer 1

我不明白你在找什么。如果你回到最外面的循环，那么中间循环是没有意义的。那就是你得到了这个

clip.groups <- c('Bay area','Alameda County','Oakland','West and Downtown Oakland')
rate.groups <- c('co.25','cbg.25')
conc.groups <- c('ppb', 'ug')
pop.groups <- c('pop.ls.night.25')
beta.groups <- c(0.001105454,0.000318195,0.001881231)

for (j in 1:length(conc.groups)){
    beta.groups[1]
    rate.groups[1]
    pop.groups[1]
    for (m in 1:length(clip.groups)){
        cat(j, "-", m, "\n")
    }
}

也许您可以更好地描述为什么要中断到最外层的循环。或者可以做一个可重现的例子(你可以用小内存的栅格做一个？)