R/s2chiphi.w.R

"s2chiphi.w" <-
function(z) {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.