0001 function polzero = fq2fac(f,q) 0002 0003 n = length(f); 0004 polzero = zeros(n,3); 0005 for i = 1:n 0006 if isnan(q(i)) 0007 polzero(i,1:2) = [1 1/(2*pi*f(i))]; 0008 else 0009 polzero(i,1:3) = [1 1/(2*pi*f(i)*q(i)) 1/((2*pi*f(i))*(2*pi*f(i)))]; 0010 end 0011 end