"cramer.phi" <- function(chi,N,r,c=r) { k <- (min(r,c)-1) phi <- sqrt(chi/(N*k)) return(phi) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.