Musterlösung: EinMassenSchwinger

function parameterstudie()
zaehler = 1; % Zaehler für die Dateinummerierung erstellen

% Schleife führt Schwinger mit unterschiedlichen daempfungen d aus und
% speichert die entstandenen Plots ab
for d = 0.1:0.4:8.1
  Schwinger(d);
  if zaehler<10
    saveas(gcf,['Schwingungsverlauf0' num2str(zaehler) '.png']);
  else
    saveas(gcf,['Schwingungsverlauf'  num2str(zaehler) '.png']);
  end
  zaehler = zaehler+1; % Zaehler bei jedem Schleifendurchlauf inkrementieren
end
close all; % Plotfenster schliessen

end