EASIalt: easiOrigin

# 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)