R/predict.sublasso.R

In SubLasso: Gene selection using Lasso for Microarray data with user-defined genes fixed in model.

Defines functions predict.sublasso

Documented in predict.sublasso

predict.sublasso<-function(object, xpred, type, s, ...){
 if (missing(type)) {type="class"}
 if (missing(s))    {s=object$lambda}
 predy=predict(object$fit,t(xpred),s=s,type=type)
 return(list(predy=predy))
}

Try the SubLasso package in your browser