eserc8

% eserc 8 Esercitazione sull'interpolazione mediante polinomi
% xi,yi i=1:n nodi di interpolazione
% la tabulazione è generata da funzioni test
% n=nodi ns=numero di punti per il grafico
% genera il grafico sia dei nodi, sia del polinomio
% interpolante, sia della funzione che ha generato i nodi
clc, clear

% input
fprintf('\n Esercitazione sull''interpolazione mediante polinomi');
no_fun=input('\n Dai il numero della funzione (3 funzioni disponibili)');
nome_fun=fun8([],no_fun);
fprintf('\n funzione corrente: %s\n\n', nome_fun);
n=input('\n dai numero nodi per interpolare:');
ns=input('\n dai numero punti per il grafico:');
a=input('\n dai il primo estremo dell''intervallo: ');
b=input('\n dai il secondo estremo dell''intervallo: ');

% Calcolo del polinomio interpolante mediante funzioni MatLab
x=linspace(a,b,n);
[nome,y]=fun8(x,no_fun);
p=polyfit(x,y,n-1);
xs=linspace(a,b,ns);
pys=polyval(p,xs);
[nome,fys]=fun8(xs,no_fun);
plot(x,y,'o',xs,pys,'k',xs,fys,'r');
legend('nodi','interpolazione',nome);
title('Esercitazione 8','FontSize', 14);