function y = aufg01f01(x);

%AUFG01F01 realisiert die Horner-Darstellung des Polynoms (x-2)^11.
%
%   Y = AUFG01F01(X) gibt fuer Eingabeargumente X vom Typ
%   Matrix eine Matrix Y zurueck, deren Eintraege y_ij = p(x_ij)
%   erfuellen. Die Berechnung erfolgt ueber das Horner-Schema.
%   Der Vektor der Koeffizienten ist dabei vorgegeben.
%
%   Meistens ist das Eingabeargument einfach eine Zahl. Der
%   Ergenbniswert ist in der Naehe der einzigen Nullstelle 2
%   sehr sensitiv gegenueber kleinen Stoerungen.
%
%   Ein eindrucksvolles Beispiel ist
%
%     x = linspace(1.85,2.15,4000);
%     plot(x,aufg01f01(x));
%
%   AUFG01F01 ist eine Hilfsfunktion fuer das Aufgabenblatt 1
%   der Vorlesung 'Numerische Verfahren' von Jens Zemke. Die
%   Funktion arbeitet unter Matlab und Octave.
%
%   SEE ALSO: aufg01f02

%   $Author: zemke $
%   $Revision: 1.8 $
%   $Date: 2004/04/15 10:24:47 $

koeffn=[1 -22 +220 -1320 +5280 -14784,...
        +29568 -42240 +42240 -28160 +11264 -2048];

onex = ones(size(x));

y = koeffn(1) * onex;
for i = 2:length(koeffn);
   y = y .* x + koeffn(i) * onex;
end
