psifair is a psi-function for robust estimation
psifair
psifair(u)
u
out transformed vector
out <- psifair(c(3.3,-0.7,2.1,1.8))
Useful links