Skip to main content
adicionou 78 caracteres ao conteúdo; título editado
Fonte Link
Daniel Falbel
  • 12,5mil
  • 25
  • 57

Linguagem R - Substituir duplo for por duplo lapply

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){
    
   ??????????
    
  })
})

Linguagem R - Substituir duplo for por duplo lapply

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)){

  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){

??????????

}) })

Substituir duplo for por duplo lapply

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)){
    
    
      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){
    
   ??????????
    
  })
})
Fonte Link
aguch
  • 45
  • 8

Linguagem R - Substituir duplo for por duplo lapply

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)){

  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){

??????????

}) })