R/ent.R

Defines functions ent

Documented in ent

ent <-
function(y){
    p <- table(y)/length(y)
    e <- -sum(p*mylog(p))
    return(e)
}

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.