All pastes #420629 Raw Edit

asdf

public text v1 · immutable
·published 2007-04-02 09:02 UTC
rendered paste body
t_min = input('Startpunkt des Zeitvektors');
t_max = input('Endpunkt des Zeitvektors');
nodes = input('Anzahl der St ¨ utzstellen');

if isempty(t_min) == 1
    t_min = 0;
end
if isempty(t_max) == 1
    t_max = 4;
end
if isempty(nodes) == 1
    nodes = 400;
end

t = linspace(t_min,t_max,nodes);

[x,y] = schwebung(t);

figure
plot (t,x);
hold on;
plot (t,y,'r');
hold on
title('Schwebung');
hold on
xlabel('t');
hold on
ylabel('Amplitude');
hold off

figure
plot (x,y);
hold on
title('Lissajous-Figur');
hold on
xlabel('x');
hold on
ylabel('y');
hold on
axis equal;
hold off