Moment Preserving Winsorizing in Stata