powered by
eBar(dat, horiz = FALSE, opt = list())
require(plyr) dat = ddply(iris, .(Species), colwise(mean)) rownames(dat) = dat[,1] dat = dat[, -1] dat plot(eBar(dat)) plot(eBar(dat, horiz = TRUE))
Run the code above in your browser using DataLab