function lambda = baryzentrisch(x)
% Berechnet die Koeffizienten der baryzentrischen
% Interpolationsformel

n = length(x);
lambda = ones(size(x));
for i = 1:n,
   lambda([1:i-1,i+1:n]) = lambda([1:i-1,i+1:n]) ./ ( x([1:i-1,i+1:n]) - x(i) );
end