Global Index (all files) (short | long) | Local Index (files in subdir) (short | long)
[arr,indi]=nans(arr,newdummy,olddummy,mode);
function [arr,ind]=nans(arr,newdummy,olddummy,mode); replace olddummy by newdummy input : arr : data array newdummy : new dummy [default nan] olddummy : old dummy [default -99.0] if longer than 1 search for each of the values, --> mode=1 mode : optional 1 : search for == olddummy 2 : search for <= olddummy 3 : search for >= olddummy [default 2] may be relational string output : arr : data array ind : indices of replaced values version 1.0.2 last change 18.08.2000
This function is called by | |
---|---|
function [arr,indi]=nans(arr,newdummy,olddummy,mode); % G.Krahmann, IfM Kiel 3. Aug 1994 % added search for more than 1 olddummy G.Krahmann, 28.11.1994 % check for empty input G.K. Aug 2000 1.0.1-->1.0.2 if nargin==0 help nans return end if isempty(arr) return end if nargin<2 newdummy=nan; end if nargin<3 olddummy=-99; end if nargin<4 mode=2; end if isstr(mode) cstr=mode; else if length(olddummy)>1 mode=1; end if mode==1 cstr='=='; elseif mode==2 cstr='<='; elseif mode==3 cstr='>='; end end indi=[]; for n=1:length(olddummy) if ~isnan(olddummy(n)) eval(['ind=find(arr',cstr,'olddummy(n));']) else ind=find(isnan(arr)); end if ~isempty(ind) arr(ind)=newdummy*ones(1,length(ind)); end indi=[indi;ind]; end