R/plot.cv.PCLasso.R

In weiliu123/PCLasso: A protein complex-based group lasso-Cox model for accurate prognosis and risk protein complex discovery

Defines functions plot.cv.PCLasso

Documented in plot.cv.PCLasso

plot.cv.PCLasso <- 
function(x, type = c("cve", "rsq", "snr", "all"), 
    norm = NULL, ...){
    if(is.null(norm)){
        type <- match.arg(type)
        plot(x$cv.fit, type = type, ...)
    }else{
        plot(x$cv.fit$fit, norm = norm, ...)
    }
}