Retrouvez, créez et partagez vos snippets en temps réel.

hrz

Content

plot(ChickWeight[ChickWeight$Chick == 1, "Time"], ChickWeight[ChickWeight$Chick == 1, "weight"], ylab='time',xlab="poids" )
points(ChickWeight[ChickWeight$Chick == 14, "Time"], ChickWeight[ChickWeight$Chick == 14, "weight"], col="red" )
legend(x="topleft",legend=c("poussin 1","poussin 14"),col =c("black","red"),pch=15)

Créé il y a 1 semaine.