<div>Olá colegas, <br /><br />Existe alguma maneira de reduzir a quantidade de objetos auxiliares no exemplo abaixo (<strong>arm1, arm2, ..., arm12</strong>), para a entrada no laço <em>for</em>?</div>
<div> </div>
<div> arm1  <- list()<br /> arm2  <- list()<br /> arm3  <- list()<br /> arm4  <- list()<br /> arm5  <- list()<br /> arm6  <- list()<br /> arm7  <- list()<br /> arm8  <- list()<br /> arm9  <- list()<br /> arm10 <- list()<br /> arm11 <- list()<br /> arm12 <- list()<br /><br />for (i in 1:nlag)<br />{<br />  arm1[[i]]  <- unlist(OK1[d1[i]:d2[i]])<br />  arm2[[i]]  <- unlist(OK1[d3[i]:d4[i]])<br />  arm3[[i]]  <- unlist(OK1[d5[i]:d6[i]])<br />  arm4[[i]]  <- unlist(OK1[d7[i]:d8[i]])<br />  arm5[[i]]  <- unlist(OK1[d9[i]:d10[i]])<br />  arm6[[i]]  <- unlist(OK1[d11[i]:d12[i]])<br />  arm7[[i]]  <- unlist(OK1[d13[i]:d14[i]])<br />  arm8[[i]]  <- unlist(OK1[d15[i]:d16[i]])<br />  arm9[[i]]  <- unlist(OK1[d17[i]:d18[i]])<br />  arm10[[i]] <- unlist(OK1[d19[i]:d20[i]])<br />  arm11[[i]] <- unlist(OK1[d21[i]:d22[i]])<br />  arm12[[i]] <- unlist(OK1[d23[i]:d24[i]])<br />}<br
  /><br />desde já agradeço!</div>
<div><br /><em>Att.</em><br /><em>André</em><br /><br /></div>