month.name class(month.name) character" tmp <- data.frame(m=rep(month.name, 2), y=rnorm(24)) bwplot(y ~ m, data=tmp) tmp <- data.frame(m=ordered(rep(month.name, 2), levels=month.name), y=rnorm(24)) bwplot(y ~ m, data=tmp)