%
%
%
% function [maxnnan]=maxnnan(y);
%
% outputs the mean of all the not NaN's in a series
%
function  [maxnnan]=maxnnan(y);
maxnnan=max(y(find(isnan(y)~=1)));
