R/roc.R

Defines functions roc

Documented in roc

roc <-
    function(exp, obs, ...)
{
    exp0 <- exp[order(obs, decreasing=TRUE)]
    data.frame(TruePostive=cumsum(exp0) / sum(exp0),
               FalsePositive=cumsum(!exp0) / sum(!exp0))
}

Try the DirichletMultinomial package in your browser

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

DirichletMultinomial documentation built on Nov. 8, 2020, 7 p.m.