Fixed: statistics.r, rename remove_outlier to a remove_outliers_1(_2).