Relative simplicial deviance
rSDev(x, y)
a propability table
an interaction table
The relative simplicial deviance
Egozcue, J.J., Pawlowsky-Glahn, V., Templ, M., Hron, K. (2015) Independence in contingency tables using simplicial geometry. Communications in Statistics - Theory and Methods, 44 (18), 3978--3996.
# NOT RUN { data(precipitation) tabprob <- prop.table(precipitation) tabind <- indTab(precipitation) tabint <- intTab(tabprob, tabind) rSDev(tabprob, tabint$intTab) # }
Run the code above in your browser using DataLab