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