Changes between Version 42 and Version 43 of Recette BilanLot

Timestamp:

Dec 24, 2012 9:11:05 PM (12 years ago)

Author:

cedric

Comment:

--

Recette BilanLot

@@ -58 +58 @@
  * Ajoutons un titre et des légendes (attention requiert ggplot version 0.9.3) :
  {{{
+bilan_lot<-get("bilan_lot",envir_stacomi)
+g<-ggplot(bilan_lot@data)
 g+stat_density(aes(x=val_quant,fill=annee),position='stack')+
                 ggtitle("Structure en taille des Aloses")+
@@ -72 +74 @@
 }}}
 {{{
-p+stat_density(aes(x=val_quant,fill=annee),position='stack')+facet_grid(. ~ .)+
-                opts(title="Structure en taille des Aloses",labels = c(x = "Tailles (mm)", y = "Densite",annee="Annees"))+
+bilan_lot<-get("bilan_lot",envir_stacomi)
+g<-ggplot(bilan_lot@data)
+g+stat_density(aes(x=val_quant,fill=annee),position='stack')+
+                ggtitle("Structure en taille des Aloses")+
+                xlab("Tailles (mm)")+
+                ylab("Densite")+
                 annotate("text",x = 300, y = 0.07, label = "essai == 2",  parse = T, vjust = 0, hjust = 0)+
-                scale_fill_brewer(palette = "Set3")
+                scale_fill_brewer(name="Annees",palette="Set3")
 }}}
  * essai = 3
 {{{
-p+stat_density(aes(x=val_quant,fill=annee),position='stack')+facet_grid(. ~ .)+
-                opts(title="Structure en taille des Aloses",labels = c(x = "Tailles (mm)", y = "Densite",annee="Annees"))+
+bilan_lot<-get("bilan_lot",envir_stacomi)
+g<-ggplot(bilan_lot@data)
+require(vcd)
+col<-diverge_hcl(length(unique(bilan_lot@data$annee)),h = c(246, 40), c = 96, l = c(65, 90))
+g+stat_density(aes(x=val_quant,fill=annee),position='stack')+
+                ggtitle("Structure en taille des Aloses")+
+                xlab("Tailles (mm)")+
+                ylab("Densite")+
                 annotate("text",x = 300, y = 0.07, label = "essai == 3",  size=10, parse = T, vjust = 0, hjust = 0,col="red")+
-                scale_fill_brewer(palette = "Spectral")
+                scale_fill_manual(name="Annees",values=col)     
 }}}
  * essai = 4