Displaying 1 result from an estimated 1 matches for "lexstar_3241".
2005 May 05
6
Need some quick help with lattice - barchart
...32,
), .Dim=c(5,8))))
colnames(testdata) <- c('month', 'year', 'mean','stdDev','miceCount')
testdata$month <- as.numeric(testdata$month)
testdata$year <- factor(testdata$year)
testdata <- testdata[do.call("order", testdata), ]
png('lexstar_3241.png', width=600, height=as.numeric(length(levels(testdata$year))*200), pointsize=8)
trellis.par.set(theme = col.whitebg())
with(testdata, print(barchart(as.numeric(mean) ~ month | year, data=testdata,
layout=c(1,length(levels(year))),
horizontal=FALSE,
scales=list(y=list(limits=...