Algorithmensammlung: Numerik: Quadratur: Newton-Cotes-Quadratur

Newton-Cotes-Quadratur

Die Newton-Cotes-Quadratur basiert auf den Vorlage:W. Diese basieren darauf, dass ein Polynom einfach integriert werden kann – die zu integrierende Funktion wird zunächst interpoliert und dann integriert.

Die Implementierungen auf dieser Seite sind solche der summierten Form der Quadratur (sog. summierte Quadraturformel). Dabei wird die Funktion nochmals durch ein Gitter in Intervalle unterteilt und auf den Intervallen getrennt integriert.

Die für den Algorithmus notwendigen Gewichte $w_i$ mit $i\in \mathbb{N}$ (aufsteigend sortiert) sind dabei:

Name	Gewichte $w_i$
Vorlage:W	$01$
Vorlage:W	$\frac{1}{2}\frac{1}{2}$
Vorlage:W	$\frac{1}{6}\frac{4}{6}\frac{1}{6}$
3/8-Regel	$\frac{1}{8}\frac{3}{8}\frac{3}{8}\frac{1}{8}$
Milne-Regel	$\frac{7}{90}\frac{32}{90}\frac{12}{90}\frac{32}{90}\frac{7}{90}$

Matlab

Siehe Octave

Octave

function integral = newtoncotes(f, gitter, gewichte)
    % f ist die Funktion.
    % Das Gitter ist ein Gitter auf dem Integrationsgebiet,
    % am einfachsten ist [a, b].
    % Die Gewichte sind vorbestimmt und können der Formel auf
    %  https://de.wikipedia.org/wiki/Newton-Cotes-Formel
    % entnommen werden.
    %
    if ! exist('gewichte')
        gewichte = [1/8 3/8 3/8 1/8]; % 3/8-Regel
    end
    integral = 0;
    for i = 1:length(gitter) - 1
        a = gitter(i);
        b = gitter(i + 1);
        % disp([' Im Teil ' num2str(a) ' - ' num2str(b) ]);
        intTeil = 0;
        for n = 1:length(gewichte)
            % disp(['  ' num2str(gewichte(n)) ' *  f(' num2str(a + (b - a) * (n - 1) / (length(gewichte) - 1)) ')' ]);
            intTeil = intTeil + gewichte(n) * f(a + (b - a) * (n - 1) / (length(gewichte) - 1));
        end
        integral = integral + intTeil * (b - a);
    end
end;