%
%?Detection?and?Removal?of?Outliers?in?Data?Sets
%????（?Rosner‘s?many-outlier?test）
%
%???????index?=?outlier（?y?[?crit]?）
%
%?where??index?=?indices?of?outliers?in?the?data
%????????y?????=?data?set?（should?be?stationary）
%????????crit??=?detection?criterion?（default?2）
%
%?Originally?written?by?Bob?Newell?February?1996
%?Modified?by?Jaco?de?Groot?May?2006
%?Bob?Newell?used?a?fixed?value?for?lambda.?This?script?calculates?the
%?critical?values?for?lambda?based?on?the?equations?in
%?“Quality?control?of?semi-continuous?mobility?size-fractionated?particle?number?concentration?data“
%?Atmospheric?Environment?38?（2004）?3341?348?Rong?Chun?Yu*?Hee?Wen?Teh?Peter?A.?Jaques?Constantinos?Sioutas
%?John?R.?Froines）
%-----------------------------------------------------
%
function?[index]?=?outlier（?y?alpha_critk）
%
y?=?y（:）;
n?=?len