% Tehtävä 2
% palauttaa lasketun approksimaation ääretönnormin.
function y = teht2(n)
xs = linspace(0,1);

% haetaan n-asteinen approksimaatio vektoriin B, joka on polynomiesitys
B = zeros(1,n+1);
for k = 0:n
    B = B + f(k/n) * bernstein(n,k,n);
end

% tarkastetaan approksimaatio plottaamalla
plot(xs, polyval(B,xs));
hold on;
plot(xs, f(xs), 'black');
legend('B', 'f');
hold off;

% ääretönnormi saadaan virhe.m:n avulla
vi = virhe(B, 100);

y = vi;

% tehtävän funktio f
function y = f(x)
y = exp(sin(7*x));