Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // -------------- Leer los datos del archivo de texto plano -----------------
- // obtener los datos de la curva 1
- [pSupx,pSupy] = readarchivo('C:\Users\PC\Desktop\Calculo Numerico\TP5\curva 1.txt');
- // obtener los datos de la curva 2
- [pInfx,pInfy] = readarchivo('C:\Users\PC\Desktop\Calculo Numerico\TP5\curva 2.txt');
- // obtener los datos de la curva 3
- [pAlaSupx,pAlaSupy] = readarchivo('C:\Users\PC\Desktop\Calculo Numerico\TP5\curva 3.txt');
- //Generar los trazadores cubicos
- d1 = splin(pSupx,pSupy);
- xx1 = linspace(pSupx(1),pSupx(length(pSupx)));
- yy1 = interp(xx1,pSupx,pSupy,d1); //perfil superior
- d2 = splin(pInfx,pInfy);
- xx2 = linspace(pInfx(1),pInfx(length(pInfx)));
- yy2 = interp(xx2,pInfx,pInfy,d2); //perfill inferior
- d3 = splin(pAlaSupx,pAlaSupy);
- xx3 = linspace(pAlaSupx(1),pAlaSupx(length(pAlaSupx)));
- yy3 = interp(xx3,pAlaSupx,pAlaSupy,d3); //perfil ala superior
- //Graficar perfil aproximado del snoopy
- plot(xx1,yy1,'r')
- plot(pSupx,pSupy,'bo')
- plot(xx2,yy2)
- plot(pInfx,pInfy,'ro')
- plot(xx3,yy3,'k')
- plot(pAlaSupx,pAlaSupy,'go')
- xgrid(12)
- title('Snoopy')
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement