www.gusucode.com > mbcdesign 工具箱 matlab 源码程序 > mbcdesign/@constar/pDefaultModel.m

    function m = pDefaultModel(con)
%PDEFAULTMODEL The default model to be used for the given constar
%
%  M = PDEFAULTMODEL(CON)
%
%  See also CONSTAR, CONBASE.

%  Copyright 2005 The MathWorks, Inc. and Ford Global Technologies, Inc.

cif = getActiveFactors( con );
naf = length( cif );

% We choose not to use CONINPUTFACTOR/MAKEXREGMODEL as we don't want to set
% the coding. We want to have coding of src = [-1, 1] and tgt = [-1, 1],
% i.e., the defaults for an xregmodel.
m = xreginterprbf( 'nfactors', naf );

% Set the kernel to be Wendlands C0 continuous kernel with width 2.2
r = get( m, 'rbfpart' );
r = set( r, 'kernel', 'wendland' );
r = set( r, 'Cont', 0 );
r = set( r, 'Width', 0.1 * round( 13 * sqrt( naf ) ) );
m = set( m, 'Rbfpart', r );

% Set the factor info
xi = xinfo( m );
xi.Names   = cif.Name.';
xi.Units   = cif.Unit.';
xi.Symbols = cif.Symbol.';
m = xinfo( m, xi );

%--------------------------------------------------------------------------
% EOF
%--------------------------------------------------------------------------