Gerade und ungerade Funktionen

Mit MATLAB läßt sich die Eigenschaft gerade/ungerade Funktion elegant grafisch darstellen, indem zwei aufeinander bezogene Punkte markiert und mit einer Linie verbunden werden.
Das Skript-M-File 'evenodd.m' erwartet ein Paar von vordefinierten Abszissen-Funktionswert-Vektoren in den Variablen 'x' und 'y'. Beim Start des Skriptes wird ein x-Wert 'v' für den Vergleichspunkt abgefragt.

%EVENODD Skript m-File zur Demonstration gerader und ungerader Funktionen
% die Vektoren x,y  muessen vorher definiert werden
v = input('Bitte Vergleichs-x-Wert eingeben: ');
[mr,vr] = min(abs(x-v)); [ml,vl] = min(abs(x+v));
mg = min(abs(y(vl)-y(vr))); mu = min(abs(y(vl)+y(vr)));
plot(x,y,'k'); hold on;  axis equal
if mu < mg
  plot([x(vl) 0  x(vr)],  [-y(vr) 0 y(vr)], '-or')
else
  plot([x(vl) 0  x(vr)],  [y(vr)  y(vr) y(vr)], '-og')
end
hold off