Pessoal estou tentando substituir meu código que possui duplo for por um com duplo lapply com objetivo de otimizar o programa já que o r trabalha de forma matricial, esta funcional desta forma:
k<-1 for(i in 1:nrow(tab1)){ for(j in 1:nrow(tab2)){
k<-1
for(i in 1:nrow(tab1)){
for(j in 1:nrow(tab2)){
tab3$col1[k]<-tab1$col1[i]
tab3$col2[k]<-tab2$col3[j]
k<-k+1
}
}
}
Gostaria que ficasse assim, mas não sei como fazer podem ajudar?Obrigado
lapply(1:nrow(tab1),fuction(i){ lapply(1:nrow(tab2), function(j){
??????????
}) })
lapply(1:nrow(tab1),fuction(i){
lapply(1:nrow(tab2), function(j){
??????????
})
})