mmpadd.m

来自「书籍：精通MATLAB－综合辅导与指南（附例程）,是一个还不错的介绍matlab」· M 代码 · 共 17 行

function p=mmpadd(a,b)
%MMPADD Polynomial Addition.
% MMPADD(A,B) adds the polynomials A and B.

% D.C. Hanselman, University of Maine, Orono ME 04469
% 3/4/95
% Copyright (c) 1996 by Prentice Hall, Inc.

if nargin<2
	error('Not enough input arguments')
end
a=a(:).';		% make sure inputs are polynomial row vectors
b=b(:).';
na=length(a);	% find lengths of a and b
nb=length(b);
p=[zeros(1,nb-na) a]+[zeros(1,na-nb) b];  % pad with zeros as necessary