# easiOrigin
## OneWay Vignette
source("http://raw.githubusercontent.com/cwendorf/easiOrigin/main/source-easiOrigin.R")
### Data Management
#### Data Entry
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)
#### Descriptive Statistics
descMeans(Outcome ~ Factor)
### Analyses of the Means
#### Confidence Intervals
ciMeans(Outcome ~ Factor)
graphMeans(Outcome ~ Factor)
ciMeans(Outcome ~ Factor, conf.level = .99)
graphMeans(Outcome ~ Factor, conf.level = .99, mu = 5)
#### Significance Tests
nhstMeans(Outcome ~ Factor)
nhstMeans(Outcome ~ Factor, mu = 5)
### Analyses of a Mean Difference
Comparison <- factor(Factor, c("Level1", "Level2"))
#### Confidence Interval
ciDifference(Outcome ~ Comparison)
graphDifference(Outcome ~ Comparison)
ciDifference(Outcome ~ Comparison, conf.level = .99)
graphDifference(Outcome ~ Comparison, conf.level = .99)
#### Significance Test
nhstDifference(Outcome ~ Comparison)
nhstDifference(Outcome ~ Comparison, mu = -2)
### Analyses of the Pairwise Comparisons
#### Confidence Intervals
ciPairwise(Outcome ~ Factor)
graphPairwise(Outcome ~ Factor)
ciPairwise(Outcome ~ Factor, conf.level = .99)
graphPairwise(Outcome ~ Factor, mu = -2, conf.level = .99)
#### Significance Tests
nhstPairwise(Outcome ~ Factor)
nhstPairwise(Outcome ~ Factor, mu = -2)
### Analyses of a Set of Contrasts
### Confidence Intervals
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)
#### Significance Tests
nhstContrasts(Outcome ~ Factor, contrasts = contr.sum)
### Analyses of the Effect
#### Source Table
descEffect(Outcome ~ Factor)
#### Significance Test
nhstEffect(Outcome ~ Factor)
#### Effect Size
pvaEffect(Outcome ~ Factor)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.