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