R/to.lrm.R

Defines functions to.lrm

to.lrm <- function(fit){
    if (class(fit)[1]=='glm'){
        base.rms::logit2lrm(fit)
    }else{
        fit
    }
}
yikeshu0611/ggDCA documentation built on Dec. 8, 2020, 5:44 a.m.