R/ameva.R

Defines functions ameva

Documented in ameva

ameva <-
function(tb){
        nr <- dim(tb)[1]
        nc <- dim(tb)[2]
        den <- nr*(nc-1)        
        val=chiSq(tb)/den
        return(val)  
}

Try the discretization package in your browser

Any scripts or data that you put into this service are public.

discretization documentation built on June 9, 2022, 5:09 p.m.