function [e]=main_approx(label)

% Costruire un polinomio che approssima
% la funzione 'f' nei punti x_1, x_2, ... x_n
% INPUT: etichetta (1,2 3...) che identifica la funzione

close all
x=input('Inserire i punti x_i ') ;
m=length(x) ;
passo=0.1 ;  %oppure inserirlo da tastiera
x1=min(x):passo:max(x);
y=libreria_funzioni(x,label) ;
y1=libreria_funzioni(x1,label) ;

figure
plot(x1,y1,'rx--')

% MODIFICARE QUI
% Costruire polinomi di grado n compreso tra
% 1 e m-2
n=input('Inserisci il grado del polinomio (minore del numero di punti x_i): ') ;
if n>=m
    n=input('Inserisci un valore piu` piccolo per il grado del polinomio: ') ;
end

% Salvare in una matrice i coefficienti dei polinomi costruiti
p=polyfit(x,y,n) ;
ypol=polyval(p,x1) ;
e=max(abs(ypol-y1)) ;
hold on
plot(x1,ypol)
grid