Code : Tout sélectionner
pie(comptage, labels= paste(names(comptage), comptage, sep=": "))
Code : Tout sélectionner
Resultat <- aggregate(cbind(Quantité, Marge) ~ Code + Date, Dta, sum)
Resultat$Marge.moy <- Resultat$Marge/Resultat$Quantité
Code : Tout sélectionner
mod <- lm(var~C*A/B, data= df)
Code : Tout sélectionner
mod <- lm(var~(C*A)/B, data= df)
Code : Tout sélectionner
mod <- lm(var~C*(A/B), data= df)