powered by
See Marazzi A. (1993), p.45
libetu(exchi = chi, upper = .dFvGet()$upr, til = .dFvGet()$tli)
See reference
Marazzi A. (1993) Algorithm, Routines, and S functions for Robust Statistics. Wadsworth & Brooks/cole, Pacific Grove, California. p.45