gendatgrid.m

来自「模式识别工具箱,希望对大家有用!」· M 代码 · 共 52 行

function griddat = gendatgrid(a,nrsteps,minval,maxval);
% GENDATGRID make grid dataset around a 2D dataset
%
%   griddat = gendatgrid(a,nrsteps);
%
% Make a grid over the region of data a with number of steps given
% in nrsteps (1x2 matrix). Per default the global variable GRIDSIZE
% is used. This works only for 2D datasets a.
%
%   griddat = gendatgrid;
%
% When no arguments are given, the axis limits of the current figure
% are used.
%
%   griddat = gendatgrid([],nrsteps,minval,maxval);
%
% The user can supply the minimum and maximum values: minval,maxval.
% Then the dataset is not used.
%
% see also: makeautogrid, plotg

% Copyright: D. Tax, R.P.W. Duin, [e-mail]
% Faculty of Applied Physics, Delft University of Technology
% P.O. Box 5046, 2600 GA Delft, The Netherlands


if nargin<3
  if nargin<1
    V = axis;
    minval = [V(1) V(3)];
    maxval = [V(2) V(4)];
  else
    minval = min(a);
    maxval = max(a);
  end
  diff = maxval-minval;
  meanval = (maxval+minval)/2;
  newscale = 0.75 * diff;
  minval = (meanval - newscale);
  maxval = (meanval + newscale);
end

if nargin<2
  griddat = makegriddat(minval(1),maxval(1),minval(2),maxval(2));
else
  if (max(size(nrsteps))==1) %dit lijkt wel op een hack;-)
    nrsteps(2) = nrsteps;
  end
  griddat = makegriddat(minval(1),maxval(1),minval(2),maxval(2),...
    nrsteps(1),nrsteps(2));
end