Changes between Version 46 and Version 47 of Recette BilanLot
- Timestamp:
- Dec 24, 2012 10:53:16 PM (12 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
Recette BilanLot
v46 v47 147 147 * essai=7 148 148 {{{ 149 p+geom_point(aes(x=annee,y=val_quant),alpha=1,position="jitter")+stat_boxplot(aes(x=annee,y=val_quant),colour="red",fill="blue",outlier.colour="red",alpha=0.4)+150 opts(title="Structure en taille des Aloses Essai 7",151 labels = c(x = "Annee", y = "Taille"))149 g+geom_point(aes(x=annee,y=val_quant),alpha=1,position="jitter")+ 150 stat_boxplot(aes(x=annee,y=val_quant),colour="red",fill="blue",outlier.colour="red",alpha=0.4)+ 151 ggtitle("Structure en taille des Aloses Essai 7")+xlab("Annees")+ylab("Taille") 152 152 }}} 153 153 [[Image(source:stacomi/trunk/docs/trac/Bilan_lot_recette11.jpg,400px)]] … … 156 156 On reprend l'exemple de tout à l'heure avec la formule suivante 157 157 {{{ 158 p+stat_density(aes(x=val_quant,fill=annee),position='stack')+facet_grid(annee ~ .) +159 opts(title="Structure en taille des Aloses essai 8",labels = c(x = "Tailles (mm)", y = "Densite",annee="Annees"))+158 g+stat_density(aes(x=val_quant,fill=annee),position='stack') + 159 ggtitle("Structure en taille des Aloses Essai 7")+xlab("Taille")+ylab("Densite")+ 160 160 scale_fill_brewer(palette = "Spectral") 161 161 }}} … … 165 165 le jeu de données qui se trouve à l'intérieur de p, le modififier et le repasser à l'objet p. 166 166 {{{ 167 donnees<- p[["data"]]# on récupère les données.167 donnees<-bilan_lot@data # on récupère les données. 168 168 donnees$annee1<-donnees$annee # on crée une nouvelle variable annee1. 169 169 copie_de_donnees<-donnees # on copie le jeu de données. 170 170 copie_de_donnees$annee1<-"all" #dans ce nouveau jeu, on remplace les valeurs des annees par "all" 171 p<-p%+%rbind(donnees,copie_de_donnees) # on raboute le nouveau et l'anciens jeu (fonction rbind = row bind, coller les lignes)171 g<-g%+%rbind(donnees,copie_de_donnees) # on raboute le nouveau et l'anciens jeu (fonction rbind = row bind, coller les lignes) 172 172 # la formule %+% permet de remplacer le jeu de données dans un objet de type ggplot. 173 p+stat_density(aes(x=val_quant,fill=annee),position='stack')+facet_grid(annee1 ~ .,scales="free") +174 opts(title="Structure en taille des Aloses essai 8",labels = c(x = "Tailles (mm)", y = "Densite",annee="Annees"))+173 g+stat_density(aes(x=val_quant,fill=annee),position='stack') +facet_grid(annee1 ~ .,scales="free") + 174 ggtitle("Structure en taille des Aloses Essai 7")+xlab("Taille")+ylab("Densite")+ 175 175 scale_fill_brewer(palette = "Spectral") 176 176 }}}