function ma = maxsc(v,perc)
% ---------------------------------------------------------------------------------------------
% maxsc.m: Compute the maximum value of a vector excluding the distribution tail.
% ma = maxsc(v,perc)
% "perc" = % of max values to be excluded
%
% ---------------------------------------------------------------------------------------------
% Maurizio Varanini, Clinical Physiology Institute, CNR, Pisa, Italy
% For any comment or bug report, please send e-mail to: maurizio.varanini@ifc.cnr.it
% ---------------------------------------------------------------------------------------------
vo=sort(v(:));
if(nargin<2), perc=5; end
if(perc<0), fi=length(v)+perc;
else fi=length(v)-floor(length(v)*perc/100); end
ma = vo(fi);
end %== function ================================================================
%