isweight.m

RBF网络逼近、RBF-建模、RBF网络训练与测试程序

function f=isweight(s)
%ISWEIGHT True if input is an NNWEIGHT structure.

%  Mark Beale, 11-31-97
%  Copyright 1992-2002 The MathWorks, Inc.
% $Revision: 1.7 $

if nnstruct(s,'nnweight')
  f = 1;
elseif isa(s,'double') & (prod(size(s)) == 0)
  f = 1;
else
  f = 0;
end