Robust biweight midvariance dispersion estimate of data
BiweightMidvariance[list]
BiweightMidvariance[list, c]
BiweightMidvariance[{1, 2, 3, 2, 1}, 8]
→ 236294415/374151649BiweightMidvariance[{6.5, 3.8, 6.6, 5.7, 6.0, 6.4, 5.3}]
→ 0.6778180448125792BiweightMidvariance[{1, 20, 3, 4}]
→ 545462774/178101075