%《MATLAB及其在理工課程中的應(yīng)用指南》第八章例8－4－2程序a
% Smith阻抗圓圖的繪制(復(fù)數(shù)繪圖方法)
% 西安電子科技大學(xué)出版社出版  陳懷琛編著 1999年10月初版，2004年11月第二版
%
% 直接用復(fù)數(shù)繪制Smith圓圖
p = logspace(-2,2);                 % 設(shè)定p向量取值范圍
%q=logspace(-2,1,10);
q = [eps,0.05,0.10.2,0.5,1,2,5,10]; % 設(shè)定q向量取值范圍
x=[-p,p];
for r = q
    g=(r+i*x-1)./(r+i*x+1);			% g對應(yīng)于gamma=(z+1)/(z-1)
    plot(g),hold on
    set(gcf,'color','w')            % 置圖形背景色為白色
    axis equal                      % x-y坐標(biāo)等比例
end
r = p;
for x=[-q,q]
    g=(r+i*x-1)./(r+i*x+1);
    plot(g),hold on
    axis equal
end
plot([0 0],[-1.1 +1.1],'r')         % 畫基準(zhǔn)線
plot([-1.1 +1.1],[0 0],'r')         % 畫基準(zhǔn)線
grid, hold off