%serie 2 aufgabe 3
function erg = plotten(a,schritte)

%plottbereich in x richtung
x = 0:0.1:3;
y1 = [];
y2 = [];
aw = [a];

for k = 1:1:length(x)
 h1 = funktion(x(k));
 y1 = [y1,h1];
 y2 = [y2,x(k)]; 
end;

%b = [0];

%approximation
%vom startwert bis zum ziel im vektor a
for k = 1:1:schritte
 a = funktion(a);
 aw = [aw,a];
end;

%mit dem startwert füllen
ax = [aw(1)];
ay = [];

for k = 2:1:(length(aw)-1)
 ax = [ax,aw(k),aw(k)]; 
 ay = [ay,aw(k),aw(k)];
end;
%mit den endwerten füllen

ax = [ax,aw(length(aw))]; 
ay = [ay,aw(length(aw)),aw(length(aw))];

plot(x,y2,'r')
%die gerade

hold on
plot(x,y1,'k')
%die funktion

plot(ax,ay,'b')
%die approximation bildlich

%anschreiben
title('Schwarz: f(x) Rot: Gerade x=y Blau: Iterationsbahn')
xlabel('x')
ylabel('y')

hold off

