> stem(islands) ... # quite skewed > mean(islands) [1] 1253 > median(islands) [1] 41 > mean(islands,trim=0.25) [1] 51.08