Octave-Skript LC


fmax = 5000;
fmin = 0;
f = linspace(fmin,fmax,100);

w = 2*pi*f;

C = 2 * 10 ^ - 6;
L = 20 * 10 ^ -3;

X_C = 1 ./ (w * C);
X_L = w * L;

plot(f, X_C, 'b');
hold on;
plot(f, X_L, 'g');
plot(f, X_L + X_C, 'r');
plot(f, (X_L .* X_C)./(X_L + X_C), 'm');
hold off
legend('C','L','C+L','C||L')
axis([fmin fmax 0 400])
ylabel('f [Hz]')
xlabel('R [Ohm]')




Siehe auch
Valid XHTML :: Valid CSS: :: Powered by WikkaWiki