% Costruzione di polinomi interpolatori
% e approssimanti di funzioni e/o dati

disp('COSTRUZIONE DI POLINOMI')
% Chiedere se approssimo funzioni o dati
% o entrambi
risp=input('Vuoi inserire coppie di dati o scegliere una funzione? Digita 1 nel primo caso altrimenti digita 2 \n ') ;

% ALTERNATIVA
% risp=menu('Dati o funzioni?','Coppie di dati','e^x-1
% ','1-1/x','1/(1+x^2)')

% Inserire gli input necessari
% e calcolo del polinomio
if risp==1 
    x=input('Inserisci il vettore dei dati x_i\n') ;
    y=input('Inserisci il vettore dei corrispondenti dati y_i\n' ) ;
    [err]=polinomi_app(x,y) ;
else
    effe=menu('Scegli la funzione da approssimare','e^x-1 ','1-1/x','1/(1+x^2)','((x^2-5x+6)log(x))/x');
    [err]=main_approx(effe) ;
    disp(err)
end

% Calolare gli errori