Skip to content
Back to formatted view

Raw Message

Message-ID: <1361187028221-4658912.post@n4.nabble.com>
Date: 2013-02-18T11:30:28Z
From: Massimo Bressan
Subject: lattice dotplot labelling median and mean values for each panel
In-Reply-To: <1361182311100-4658900.post@n4.nabble.com>

sorry, I've managed to find a (partial) solution to my problem (even not much
elegant);
now what is left out is the proper tweaking of labels...

any better solutions?

dotplot(variety ~ yield | site, data = barley, 
        layout = c(1,6),
        index.cond= function(x,y){median(x)},
        panel = function(x,y,...) { 
          panel.dotplot(x,y,...) 
          median.values <- median(x) 
          panel.abline(v=median.values, col.line="red")
          mean.values<-mean(x)
          panel.abline(v=mean.values, col.line="blue")
          panel.text(x=median.values,y=mean(as.numeric(y)),
labels=round(median.values,0),col="red",pos=1,...)
          panel.text(x=mean.values,y=mean(as.numeric(y)),
labels=round(mean.values,0),col="blue",pos=1,...)
          })



--
View this message in context: http://r.789695.n4.nabble.com/lattice-dotplot-labelling-median-and-mean-values-for-each-panel-tp4658900p4658912.html
Sent from the R help mailing list archive at Nabble.com.