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