superb: Summary plots with adjusted error bars

CRAN Status

cat("this will be hidden; use for general initializations.\n")
library(superb)
library(ggplot2)
options("superb.feedback" = "none") # shut down all information

The library superb offers two main functionalities. First, it can be used to obtain plots with adjusted error bars. The main function is superb() but you can also use superbShiny() for a graphical user interface requiring no programming nor scripting. See the nice tutorial by @w21.

The purpose of superb() is to provide a plot with summary statistics and correct error bars. With simple adjustments, the error bar are adjusted to the design (within or between), to the purpose (single or pair-wise differences), to the sampling method (simple randomized samples or cluster randomized samples) and to the population size (infinite or of a specific size). The superbData() function does not generate the plot but returns the summary statistics and the interval boundaries. These can afterwards be sent to other plotting environment.

The second functionality is to generate random datasets. The function GRD() is used to easily generate random data from any design (within or between) using any population distribution with any parameters, and with various effect sizes. GRD() is useful to test statistical procedures and plotting procedures such as superb().

Installation

The official CRAN version can be installed with

install.packages("superb")
library(superb)

The development version r packageVersion("superb") can be accessed through GitHub:

devtools::install_github("dcousin3/superb")
library(superb)
library(superb)

Examples

The easiest is to use the graphical interface which can be launched with

superbShiny()

The following examples use the script-based commands.

Here is a simple example illustrating the ToothGrowth dataset of rats (in which the dependent variable is len) as a function of the dose of vitamin and the form of the vitamin supplements supp (pills or juice)

superb(len ~ dose + supp, ToothGrowth )

In the above, the default summary statistic, the mean, is used. The error bars are, by default, the 95% confidence intervals. These two choices can be changed with the statistic and the errorbar arguments.

This second example explicitly indicates to display the median instead of the default mean summary statistics

superb(len ~ dose + supp, ToothGrowth,
    statistic = "median")

As a third example, we illustrate the harmonic means hmean along with 99.9% confidence intervals using lines:

superb(len ~ dose + supp, ToothGrowth,
    statistic = "hmean", 
    errorbar = "CI", gamma = 0.999,
    plotStyle = "line")

The second function, GRD(), can be used to generate random data from designs with various within- and between-subject factors. This example generates scores for 300 simulated participants in a 3 x 2 design with repeated-measures on Days. Only the factor Day is modeled as impacting the scores (the reduce by 3 points on the second day):

set.seed(663) # for reproducibility
testdata <- GRD(
    RenameDV   = "score", 
    SubjectsPerGroup = 50, 
    BSFactors  = "Difficulty(A,B,C)", 
    WSFactors  = "Day(2)",
    Population = list(mean = 75,stddev = 10,rho = 0.8),
    Effects    = list("Day" = slope(-5), "Difficulty" = slope(3) )
)
head(testdata)

This is here that the full benefits of superb() is seen: with just a few adjustments, you can obtained decorrelated error bars with the Correlation-adjusted (CA), the Cousineau-Morey (CM) or the Loftus & Masson (CM) techniques:

library(gridExtra)          # for grid.arrange

plt1 <- superb( cbind(score.1, score.2) ~ Difficulty, 
    testdata, WSFactors = "Day(2)",
    plotStyle = "line"
) + ylim(65,85) + labs(title = "No adjustments")
plt2 <- superb( cbind(score.1, score.2) ~ Difficulty, 
    testdata, WSFactors = "Day(2)",
    adjustments = list(purpose = "difference", decorrelation = "CA"),
    plotStyle = "line"
)+ ylim(65,85) + labs(title = "correlation- and difference-adjusted")
grid.arrange(plt1,plt2, ncol=2)

Even better, the simulated scores can be illustrated using using a more elaborated layout, the pointjitterviolin which, in addition to the mean and confidence interval, shows the raw data using jitter dots and the distribution using a violin plot:

superb( cbind(score.1, score.2) ~ Difficulty, 
    testdata, WSFactors = "Day(2)",
    adjustments = list(purpose = "difference", decorrelation = "CM"),
    plotStyle = "pointjitterviolin",
    errorbarParams = list(color = "purple"),
    pointParams = list( size = 3, color = "purple")
)

In the above example, optional arguments errorbarParams and pointParams are used to inject specifications in the error bars and the points respectively. When these arguments are used, they override the defaults from superb().

For more

As seen, the library superb makes it easy to illustrate summary statistics along with the error bars. Some layouts can be used to visualize additional characteristics of the raw data. Finally, the resulting appearance can be customized in various ways.

The complete documentation is available on this site.

A general introduction to the superb framework underlying this library is published at Advances in Methods and Practices in Psychological Sciences (Cousineau, Goulet, & Harding, 2021).

References

Cousineau D, Goulet M, Harding B (2021). "Summary plots with adjusted error bars: The superb framework with an implementation in R." Advances in Methods and Practices in Psychological Science, 2021, 1--46. doi: https://doi.org/10.1177/25152459211035109

Walker, J. A. L. (2021). "Summary plots with adjusted error bars (superb)." Youtube video, accessible here.



dcousin3/superb documentation built on Oct. 29, 2024, 5:28 p.m.