Smithyness

on 29 Oct 2021

% I think the smithchart in itself is beautiful art and wanted to make sure

% it got represented.

% Plot a smith chart, and then rotate 90 deg

t=pi*[0:.0001:2];

p=@(a,b,c)plot(a*(b-exp(1j*t))+c,'color','k','linew',2);

hold;

Current plot held

for r=[0:.4:20]

q=1/(r+1);

%plot(q*exp(1j*t)-q+1,'Color','k');

l=p(q,0,1-q);

l.Color=[0 0 0 q/2];

%plot(1-exp(1j*t)/r+j/r);

l=p(1/r,r,j/r);

l.Color=[0 0 0 q/2];

%plot(1-exp(1j*t)/r-j/r);

l=p(1/r,r,-j/r);

l.Color=[0 0 0 q/2];

end

axis([-1 1 -1 1])

camva(6)

camup([-1 0 0])

set(gcf,'Color',.8*[1 1 1.03])

axis off