I could use a little help writing a panel function to append text to each panel of a lattice::barchart(). Below is a modified version of the barley dataset to illustrate.
data(barley) # add a new variable called samp.size barley$samp.size<-round(runif(n=nrow(barley), min=0, max=50),0) # Below is a barchart plot for this example barchart(yield ~ variety | site, data = barley, groups = year, layout = c(1,6), stack = TRUE, auto.key = list(space = "right"), ylab = "Barley Yield (bushels/acre)", scales = list(x = list(rot = 45))) # I need to add to each panel the sum of samp.size by the groups variable (year) for that panel. # So the text appended to the top panel (Waseca) might say "1931=15, 1932=20", and same for each subsequent panel. [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.