easiOrigin: easiOrigin

# easiOrigin
## Repeated Vignette

source("http://raw.githubusercontent.com/cwendorf/easiOrigin/main/source-easiOrigin.R")

### Data Management

#### Data Entry

Outcome1 <- c(0, 0, 3, 5)
Outcome2 <- c(4, 7, 4, 9)
Outcome3 <- c(9, 6, 4, 9)
RepeatedData <- data.frame(Outcome1, Outcome2, Outcome3)

#### Descriptive Statistics

descMeans(RepeatedData)

### Analyses of the Means

#### Confidence Intervals

ciMeans(RepeatedData)
graphMeans(RepeatedData)

ciMeans(RepeatedData, conf.level = .99)
graphMeans(RepeatedData, conf.level = .99, mu = 5)

#### Significance Tests

nhstMeans(RepeatedData)
nhstMeans(RepeatedData, mu = 5)

### Analyses of a Mean Difference

ComparisonData <- data.frame(Outcome1, Outcome2)

#### Confidence Interval

ciDifference(ComparisonData)
graphDifference(ComparisonData)

ciDifference(ComparisonData, conf.level = .99)
graphDifference(ComparisonData, conf.level = .99)

#### Significance Test

nhstDifference(ComparisonData)
nhstDifference(ComparisonData, mu = -2)

### Analyses of the Pairwise Comparisons

#### Confidence Intervals

ciPairwise(RepeatedData)
graphPairwise(RepeatedData)

ciPairwise(RepeatedData, conf.level = .99)
graphPairwise(RepeatedData, mu = -2, conf.level = .99)

#### Significance Tests

nhstPairwise(RepeatedData)
nhstPairwise(RepeatedData, mu = -2)

### Analyses of a Set of Contrasts

### Confidence Intervals

ciContrasts(RepeatedData, contrasts = contr.sum)
graphContrasts(RepeatedData, contrasts = contr.sum)

ciContrasts(RepeatedData, contrasts = contr.sum, conf.level = .99)
graphContrasts(RepeatedData, contrasts = contr.sum, conf.level = .99)

#### Significance Tests

nhstContrasts(RepeatedData, contrasts = contr.sum)

### Analyses of the Effect

#### Source Table

descEffect(RepeatedData)

#### Significance Test

nhstEffect(RepeatedData)

#### Effect Size

pvaEffect(RepeatedData)