x_a2_fnct.m
上传用户:loeagle
上传日期:2013-03-02
资源大小:1236k
文件大小:0k
源码类别:

通讯编程文档

开发平台:

Matlab

  1. function y=x_a2_fnct(x,funfcn,a,p1,p2,p3)
  2. % y=x_a2_fnct(x,funfcn,a,p1,p2,p3)
  3. %  Returns the function funfcn(x) times (x-a).^2
  4. args=[];
  5. for nn=1:nargin-3
  6.   args=[args,',p',int2str(nn)];
  7. end
  8. args=[args,')'] ;
  9. y=eval([funfcn,'(x',args,'.*(x-a).^2' ]);