Circuit Theory/Series Resistance/m-file

R=100; C=10^(-6); L = 2*10^(-3);

s=i*22400;
Z = R + s*L + 1/(s*C)
abs(Z),angle(Z),angle(Z)*180/pi

s = -5000 + i*22400;
Z = R + s*L + 1/(s*C)
abs(Z),angle(Z),angle(Z)*180/pi