# This will make a plot with bars
superb(
len ~ dose + supp,
ToothGrowth,
plotStyle="bar"
)
# if you extract the data with superbData, you can
# run this layout directly
#processedData <- superb(
# len ~ dose + supp,
# ToothGrowth,
# showPlot = FALSE
#)
#
#superbPlot.bar(processedData$summaryStatistic,
# "dose",
# "supp",
# ".~.",
# processedData$rawData)
Run the code above in your browser using DataLab