fnrfn.m

演示matlab曲线拟和与插直的基本方法

% FNRFN   F 偵懳偡傞嬫暘偵捛壛偺僒僀僩傪憓擖
%
% FNEW = FNRFN(F) 偲 FNRFN(F,'mid') 偼丄嫟偵摨偠宍幃偱丄F 偵偁傞娭悢偺
% 婰弎傪弌椡偟傑偡偑丄偦偺嬫暘娫妘偺偦傟偧傟偵拞揰傪憓擖偡傞偙偲偵傛傝
% 夵椙偝傟偨嬫暘偲偟偰弌椡偟傑偡丅
%
% FNEW = FNRFN(F,ADDPTS) 偼丄摨偠宍幃偱丄F 偵偁傞娭悢偺婰弎傪弌椡偟傑
% 偡偑丄ADDPTS 偺楍偱丄僒僀僩傪憓擖偡傞偙偲偱夵椙偝傟傞嬫暘傪弌椡偟傑偡丅
% ADDPTS 偑嬻偺応崌丄捛壛偝傟傞僒僀僩偼偁傝傑偣傫丅
%
% 娭悢偑B-宆偺応崌丄ADDPTS 偼丄僗僾儔僀儞偺師悢傪挻偊偰愡揰偺懡廳搙
% 傪憹壛偝偣側偄斖埻偱丄捛壛偡傞愡揰偲偟偰夝庍偝傟傑偡丅
%
% 娭悢偑pp-宆偱偁傞応崌丄僽儗乕僋億僀儞僩偺楍偵傑偩懚嵼偟側偄 ADDPTS 偺
% 奺梫慺偑丄捛壛偺僽儗乕僋億僀儞僩偲偟偰巊梡偝傟傑偡丅
%
% F 偵偁傞娭悢偑m曄悢娭悢偺応崌丄ADDPTS 偼丄挿偝 m 偺僙儖攝楍偱側偗傟偽
% 側傝傑偣傫丅偙偺j斣栚偺僙儖偼丄傕偟偁傟偽丄j斣栚偺曄悢偵捛壛偺僒僀僩
% 傪巜掕偟傑偡丅
%
% 椺戣:
% B-宆僗僾儔僀儞傪嶌惉偟偰僾儘僢僩偟丄偦偺屻丄2偮偺拞揰傪梡偄偨夵椙傪
% 揔梡偟傑偡丅偝傜偵丄夵椙偝傟偨寢壥偺僗僾儔僀儞偺惂屼懡妏宍傪丄僗僾儔僀儞
% 帺恎偵旕忢偵嬤偄傕偺偱偁傞偲傒側偟丄僾儘僢僩偟傑偡丅
%
%      k = 4; sp = spapi( k, [1,1:10,10], [cos(1),sin(1:10),cos(10)] );
%      fnplt(sp), hold on
%      sp3 = fnrfn(fnrfn(sp));
%      plot( aveknt( fnbrk(sp3,'knots'),k), fnbrk(sp3,'coefs'), 'r')
%      hold off 
%
% 戞3偺夵椙偱偼丄2偮偺嬋慄傪嬫暿偱偒側偄傛偆偵偟傑偡丅
%
% 懠偺椺偲偟偰丄摨偠師悢傪傕偮2偮偺B-僗僾儔僀儞傪壛偊傞偨傔偵丄FNRFN 
% 傪巊梡偟傑偡丅
%
%      B1 = spmak([0:4],1); B2 = spmak([2:6],1);
%      B1r = fnrfn(B1,fnbrk(B2,'knots'));
%      B2r = fnrfn(B2,fnbrk(B1,'knots'));
%      B1pB2 = spmak(fnbrk(B1r,'knots'),fnbrk(B1r,'c')+fnbrk(B2r,'c'));
%      fnplt(B1,'r'),hold on, fnplt(B2,'b'), fnplt(B1pB2,'y',2)
%      hold off
%   
% 嶲峫 PPRFN, SPRFN, FNCMB.


%   Copyright 1987-2004 C. de Boor and The MathWorks, Inc.