Discussion :

[habasque]

Bonjour à tous,

Je souhaiterais savoir comment je peux optimiser la boucle suivante :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
for (i in 1:dim(maTable)[1]) {
   if ((maTable$Champ1[i] == 0) & (maTable$Champ2[i] > 0)){
      maTable$Champ1[i] = 1
   }
   if ((maTable$Champ1[i] > 0) & (maTable$Champ2[i] == 0)){
      maTable$Champ2[i] = 1
   }
}

Si quelqu'un a une idée...
Merci d'avance.

[ced]

Bonjour,

J'imagine que maTable est un dataframe...
En fait, il n'y a pas besoin de boucles pour faire ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
maTable[maTable$Champ1 == 0 & maTable$Champ2 > 0, "Champ1"] <- 1
maTable[maTable$Champ1 > 0 & maTable$Champ2 == 0, "Champ2"] <- 1

ced

[habasque]

Nickel, c'est parfait !