R/predict.lspcr.glm.R

Defines functions predict.lspcr.glm

Documented in predict.lspcr.glm

predict.lspcr.glm<-function(object,newX,newD,...){
  etaT=cbind(rep(1,dim(newD)[1]),newD,newX%*%object$projection)%*%object$coefficients
  piT=1/(1+exp(-etaT))
  YT=(etaT>0)+0
  return(list(newY=YT,newPi=piT)) 
}

Try the lsplsGlm package in your browser

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

lsplsGlm documentation built on July 27, 2017, 5:01 p.m.