borrar
x=[.2 .4 .6 .8 1.0];
y=[0.98 0.92 0.81 0.64 0.38];
yi0=interp1(x, y, 0.025, 'lineal')
xi=0:.02:1;
yi=interp1(x, y, xi, 'lineal');
zi=interp1(x,y,xi,'spline');
wi=interp1(x,y,xi,'cubic');
plot(x, y, 'o', xi, yi, 'r ', xi, zi, 'g*', xi, wi, 'k.-')
legend('punto original', 'punto lineal', 'spline cúbico', 'polinomio cúbico')
Este es un consejo, hazlo tú mismo, estoy ocupado, de lo contrario te ayudaré. Listo .