R/predict.uniCox.R

In uniCox: Univarate shrinkage prediction in the Cox model

Defines functions predict.uniCox

Documented in predict.uniCox

predict.uniCox=function(object,x,...){

# x is n by p

mx=object$mx
vx=object$vx
s0=object$s0
beta=object$beta
x=scale(x,center=mx,scale=F)
xs=scale(x,center=F,scale=sqrt(vx)+s0)
yhat=x%*%beta
return(yhat)
}

Try the uniCox package in your browser