figure();grid();S=[[-2]*4+[-1,0,1]+[2]*4,[0,0,0,4*3/2,0,0,0],3];t=linspace(S[0][0],S[0][-1],1000);plot(t,splev(t,S),label='cubic spline');plot(t,splev(t,S,der=1),label='1st derivative');xlim(-2,2);ylim(-5,5);legend()
Este archivo contiene información adicional, probablemente agregada desde la cámara digital o el escáner utilizado para crearlo o digitalizarlo.
Si el archivo se ha modificado desde su estado original, es posible que algunos detalles no reflejen completamente el archivo modificado.
