Bonjour,

j'aimerai optimiser cette boucle s'il vous plait. par un remplacement par la fonction apply ou autre.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
 
for( i in 1:nrow(donnee_finale))
{
  donnee_finale[i,22] <- sum(donnee_finale[i, c(6,8,10,12,14)] < donnee_finale[i, 16]  ,na.rm = T)
}