[dsp-l] Re: [dsp-l] corrección a la rutina

[Ignacio Ramirez]

Oops, quedaron algunos caracteres extraños ("=3D"-> "=")

 % FUNCION QUE GENERA LOS ARCHIVOS .LOD
 % PARA USARLOS EN EL "DSP"

function f=savelod(mat,memspace,addrspace,filename);

[m,n]=size(mat);
r=m*n;
mat_lin=reshape(mat',1,r); %cambia el tama=F1o
fid=fopen(filename,'w');
fprintf(fid,'_DATA %c %h\n',memspace,addrspace);
i=1;
while i<=r-3
   fprintf(fid,'%f %f %f
%f\n',mat_lin(i),mat_lin(i+1),mat_lin(i+2),mat_lin(i+3));
    i=i+4;
end
fclose(fid);

---- Original Message -----
From: "Ignacio Ramirez" <nacho en iie.edu.uy>
To: <dsp-l en iie.edu.uy>
Sent: Thursday, December 20, 2001 12:10 PM
Subject: [dsp-l] corrección a la rutina


>
> Lo mando de vuelta porque el otro no se entendía nada
>
> Muchas gracias Darío. La corrección que vos hacés es correcta, en la
> otra versión se incrementaba i de a 1 y se repetían 3 valores en cada
linea.
>
> (eso si no es exactamente un problema de cambiar for por while, la
> clave está en sumarle 4 a i en lugar de 1 :) ).
>
>  % FUNCION QUE GENERA LOS ARCHIVOS .LOD
>  % PARA USARLOS EN EL "DSP"=09
>
> function f=3Dsavelod(mat,memspace,addrspace,filename);
>
> [m,n]=3Dsize(mat);
> r=3Dm*n;
> mat_lin=3Dreshape(mat',1,r); %cambia el tama=F1o
> fid=3Dfopen(filename,'w');
> fprintf(fid,'_DATA %c %h\n',memspace,addrspace);
> i=3D1;
> while i<=3Dr-3
>    fprintf(fid,'%f %f %f
> %f\n',mat_lin(i),mat_lin(i+1),mat_lin(i+2),mat_lin(i+3));
>     i=3Di+4;
> end
> fclose(fid);
>
>
>
>
> --- dsp-l en iie.edu.uy ------------------------------
> por altas y bajas de la lista dirijase al formulario en
> la pagina web del curso: http://www.iie.edu.uy/ense/asign/sisdsp/
>


--- dsp-l en iie.edu.uy ------------------------------
por altas y bajas de la lista dirijase al formulario en
la pagina web del curso: http://www.iie.edu.uy/ense/asign/sisdsp/