R/Psizphi.n.R

"Psizphi.n" <-
function(z) {psi.weight(z,ips=2,xk=1.5477)*z*dnorm(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.