Lehmacher's Test for Marginal Homogenity
Performs Lehmacher's chi-squared test for marginal homogenity in a symmetric two-dimensional contingency table.
LehmacherTest(x, y = NULL) ## S3 method for class 'mtest' print(x, digits = 4L, ...)
x |
either a two-dimensional contingency table in matrix form, or a factor object. |
y |
a factor object; ignored if x is a matrix. |
digits |
a non-null value for digits specifies the minimum number of significant digits to be printed in values. See details in |
... |
further arguments to be passed to or from other methods. They are ignored in this function. |
The null is that the probabilities of being classified into cells [i,j] and [j,i] are the same.
If x is a matrix, it is taken as a two-dimensional contingency table, and hence its entries should be nonnegative integers. Otherwise, both x and y must be vectors or factors of the same length. Incomplete cases are removed, vectors are coerced into factors, and the contingency table is computed from these.
A list with class "mtest" containing the following components:
statistic |
a vector with the value of the test statistics. |
parameter |
the degrees of freedom, which is always 1 in LehmacherTest. |
p.value |
a vector with the p-values of the single tests. |
p.value.corr |
a vector with the "hochberg" adjusted p-values of the single tests. (See |
method |
a character string indicating what type of test was performed. |
data.name |
a character string giving the name of the data. |
Andri Signorell <andri@signorell.net>
Lehmacher, W. (1980) Simultaneous sign tests for marginal homogeneity of square contingency tables Biometrical Journal, Volume 22, Issue 8, pages 795-798
mcnemar.test (resp. BowkerTest for a CxC-matrix), StuartMaxwellTest, WoolfTest
x <- matrix(c(400,40,20,10,
50,300,60,20,
10,40,120,5,
5,90,50,80), nrow=4, byrow=TRUE)
LehmacherTest(x)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.