paftoga: High dimensional AFT model using PGA and OGA

zerones <-
function(n,loc=NA){
	re=rep(0,n);
	if (is.na(loc))return(re);
	re[loc]=1;
	re
	}

yfyang86/paftoga documentation built on May 4, 2019, 2:33 p.m.

Note that we can't provide technical support on individual packages. You should contact the package authors for that.