R/s1chiphi.w.R

"s1chiphi.w" <-
function(z) {(exp(z)-1)*(chi.weight(z,ips=2,xk=1.717817)-0.5)*ezez(z)}

Try the RobustAFT package in your browser

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

RobustAFT documentation built on June 19, 2026, 9:08 a.m.