library(AgroR)
data("laranja")
a=with(laranja, DBC(trat, bloco, resp, ylab = "Number of fruits/plants"))
b=with(laranja, DBC(trat, bloco, resp, ylab = "Number of fruits/plants"))
c=with(laranja, DBC(trat, bloco, resp, ylab = "Number of fruits/plants"))
bargraph_onefactor(analysis = list(a,b,c), labels = c("One","Two","Three"),ocult.box = TRUE)
Run the code above in your browser using DataLab