# suppress the warnings and other messages from showing in the knitted file. knitr::opts_chunk$set(fig.width = 7, fig.height = 5, fig.path = "figures/", echo = TRUE, warning = FALSE, message = FALSE) devtools::source_gist("8e6e5dc401e3fc1042ef7a030f9d19c7", filename = "revised_toc.R")
if (!require(easiOrigin)) { if (!require(remotes)) install.packages("remotes") remotes::install_github("cwendorf/easiOrigin") } library(easiOrigin)
This vignette analyzes data from a one-way between-subjects design.
thisfile <- knitr::current_input() revised_toc(thisfile, base_level = 3, toc_depth = 4)
Factor <- c(rep(1, 4), rep(2, 4), rep(3, 4)) Outcome <- c(0, 0, 3, 5, 4, 7, 4, 9, 9, 6, 4, 9) Factor <- factor(Factor, levels = c(1, 2, 3), labels = c("Level1", "Level2", "Level3")) OneWayData <- data.frame(Factor, Outcome)
descMeans(Outcome ~ Factor)
ciMeans(Outcome ~ Factor) graphMeans(Outcome ~ Factor)
ciMeans(Outcome ~ Factor, conf.level = .99) graphMeans(Outcome ~ Factor, conf.level = .99, mu = 5)
nhstMeans(Outcome ~ Factor) nhstMeans(Outcome ~ Factor, mu = 5)
Comparison <- factor(Factor, c("Level1", "Level2"))
ciDifference(Outcome ~ Comparison) graphDifference(Outcome ~ Comparison)
ciDifference(Outcome ~ Comparison, conf.level = .99) graphDifference(Outcome ~ Comparison, conf.level = .99)
nhstDifference(Outcome ~ Comparison) nhstDifference(Outcome ~ Comparison, mu = -2)
ciPairwise(Outcome ~ Factor) graphPairwise(Outcome ~ Factor)
ciPairwise(Outcome ~ Factor, conf.level = .99) graphPairwise(Outcome ~ Factor, mu = -2, conf.level = .99)
nhstPairwise(Outcome ~ Factor) nhstPairwise(Outcome ~ Factor, mu = -2)
ciContrasts(Outcome ~ Factor, contrasts = contr.sum) graphContrasts(Outcome ~ Factor, contrasts = contr.sum)
ciContrasts(Outcome ~ Factor, contrasts = contr.sum, conf.level = .99) graphContrasts(Outcome ~ Factor, contrasts = contr.sum, conf.level = .99)
nhstContrasts(Outcome ~ Factor, contrasts = contr.sum)
descEffect(Outcome ~ Factor)
nhstEffect(Outcome ~ Factor)
pvaEffect(Outcome ~ Factor)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.