# gkgamma: Goodman-Kruskal's gamma statistic for a two-dimensional table In MESS: Miscellaneous Esoteric Statistical Scripts

## Description

Compute Goodman-Kruskal's gamma statistic for a two-dimensional table of ordered categories

## Usage

 `1` ```gkgamma(x, conf.level = 0.95) ```

## Arguments

 `x` A matrix or table representing the two-dimensional ordered contingency table of observations `conf.level` Level of confidence interval

## Value

A list with class `htest` containing the following components:

 `statistic ` the value the test statistic for testing no association `p.value ` the p-value for the test `estimate ` the value the gamma estimate `conf.int ` the confidence interval for the gamma estimate `method ` a character string indicating the type of test performed `data.name ` a character string indicating the name of the data input `observed ` the observed counts `s0 ` the SE used when computing the test statistics `s1 ` the SE used when computing the confidence interval

## Author(s)

Claus Ekstrom [email protected]

## References

Goodman, Leo A. and Kruskal, William H. (1954). "Measures of Association for Cross Classifications". Journal of the American Statistical Association 49 (268): 732-764.

`chisq.test`
 ```1 2 3 4 5 6``` ```# Data from the Glostrup study comparing smoking to overall health in males smoke <- matrix(c(16, 15, 13, 10, 1, 73, 75, 59, 81, 29, 6, 6, 7, 17, 3, 1, 0, 1, 3, 1), ncol=4) colnames(smoke) <- c("VGood", "Good", "Fair", "Bad") # General health status rownames(smoke) <- c("Never", "No more", "1-14", "15-24", "25+") # Smoke amount gkgamma(smoke) chisq.test(smoke) ```