UncertCoef {DescTools}  R Documentation 
The uncertainty coefficient U(CR) measures the proportion of uncertainty (entropy) in the column variable Y that is explained by the row variable X. The function has interfaces for a table, a matrix, a data.frame and for single vectors.
UncertCoef(x, y = NULL, direction = c("symmetric", "row", "column"),
conf.level = NA, p.zero.correction = 1/sum(x)^2, ...)
x 
a numeric vector, a factor, matrix or data frame. 
y 

direction 
direction of the calculation. Can be 
conf.level 
confidence level of the interval. If set to 
p.zero.correction 
slightly nudge zero values so that their logarithm can be calculated 
... 
further arguments are passed to the function 
The uncertainty coefficient is computed as
U(CR) = \frac{H(X) + H(Y)  H(XY)}{H(Y)}
and
ranges from [0, 1].
Either a single numeric value, if no confidence interval is required,
or a vector with 3 elements for estimate, lower and upper confidence intervall.
Andri Signorell <andri@signorell.net> strongly based on code from Antti Arppe <antti.arppe@helsinki.fi>
Theil, H. (1972), Statistical Decomposition Analysis, Amsterdam: NorthHolland Publishing Company.
# example from Goodman Kruskal (1954)
m < as.table(cbind(c(1768,946,115), c(807,1387,438), c(189,746,288), c(47,53,16)))
dimnames(m) < list(paste("A", 1:3), paste("B", 1:4))
m
# direction default is "symmetric"
UncertCoef(m)
UncertCoef(m, conf.level=0.95)
UncertCoef(m, direction="row")
UncertCoef(m, direction="column")