The "Statistics::Descriptive" example (near the end of the article) has to be a bug in the relevant library, right? Even the naive floating implementation can'

The "Statistics::Descriptive" example (near the end of the article) has to be a bug in the relevant library, right? Even the naive floating implementation can't possibly get it this wrong for just 4 numbers.