meannan.m (266B)
1 % MeanNaN.m means=meanNaN(x) 2 % Like mean.m, but ignores NaN when returning the mean of each column 3 4 function means=meannan(x); 5 6 means=[]; 7 [T K] = size(x); 8 for i=1:K; 9 y=packr(x(:,i)); 10 if length(y)==0; 11 means=[means NaN]; 12 else; 13 means=[means mean(y)]; 14 end; 15 end;