Performs Scheffe's all-pairs comparisons test for normally distributed data with equal group variances.
scheffeTest(x,...)## Default S3 method:scheffeTest(x, g,...)## S3 method for class 'formula'scheffeTest(formula, data, subset, na.action,...)## S3 method for class 'aov'scheffeTest(x,...)
Arguments
x: a numeric vector of data values, a list of numeric data vectors or a fitted model object, usually an aov fit.
...: further arguments to be passed to or from methods.
g: a vector or factor object giving the group for the corresponding elements of "x". Ignored with a warning if "x" is a list.
formula: a formula of the form response ~ group where response gives the data values and group a vector or factor of the corresponding groups.
data: an optional matrix or data frame (or similar: see model.frame) containing the variables in the formula formula. By default the variables are taken from environment(formula).
subset: an optional vector specifying a subset of observations to be used.
na.action: a function which indicates what should happen when the data contain NAs. Defaults to getOption("na.action").
Returns
A list with class "PMCMR" containing the following components:
method: a character string indicating what type of test was performed.
data.name: a character string giving the name(s) of the data.
statistic: lower-triangle matrix of the estimated quantiles of the pairwise test statistics.
p.value: lower-triangle matrix of the p-values for the pairwise tests.
alternative: a character string describing the alternative hypothesis.
p.adjust.method: a character string describing the method for p-value adjustment.
model: a data frame of the input data.
dist: a string that denotes the test distribution.
Details
For all-pairs comparisons in an one-factorial layout with normally distributed residuals and equal variances Scheffe's test can be performed. Let Xij denote a continuous random variable with the j-the realization (1≤j≤ni) in the i-th group (1≤i≤k). Furthermore, the total sample size is N=∑i=1kni. A total of m=k(k−1)/2
hypotheses can be tested: The null hypothesis is Hij:μi=μj(i=j) is tested against the alternative Aij:μi=μj (two-tailed). Scheffe's all-pairs test statistics are given by
tijsin(1/nj+1/ni)1/2Xˉi−Xjˉ,(i=j)
with sin2 the within-group ANOVA variance. The null hypothesis is rejected if tij2>Fv1v2α, with v1=k−1,v2=N−k degree of freedom. The p-values are computed from the FDist distribution.
Examples
fit <- aov(weight ~ feed, chickwts)shapiro.test(residuals(fit))bartlett.test(weight ~ feed, chickwts)anova(fit)## also works with fitted objects of class aovres <- scheffeTest(fit)summary(res)summaryGroup(res)
References
Bortz, J. (1993) Statistik für Sozialwissenschaftler. 4. Aufl., Berlin: Springer.
Sachs, L. (1997) Angewandte Statistik, New York: Springer.
Scheffe, H. (1953) A Method for Judging all Contrasts in the Analysis of Variance, Biometrika 40 , 87--110.