Mean after winsorizing extreme values — the lowest and highest fraction of the
WinsorizedMean[list, f]
WinsorizedMean[list, {f1, f2}]
WinsorizedMean[list]
WinsorizedMean[dist, …]
WinsorizedMean[{1, 2, 3, 4, 5, 6, 7, 8, 9, 100}, 0.2]
→ 11/2WinsorizedMean[Range[10], {2/10, 1/10}]
→ 57/10WinsorizedMean[{1, 2, 3, 4, 5, 6, 7, 8, 9, 1000}]
→ 209/2WinsorizedMean[<|"x" -> 1, "y" -> 2, "z" -> 1000|>, 1/3]
→ 2