clear
datos= 1: 90 ;%rand(90,1);
name='archivo.txt';
fid=fopen(name,'w');
fprintf(fid,'%f\n',datos);
fclose(fid);
%type(name)
data=importdata(name);
division=9;
cantidad=length(data)/division;
D=reshape(data,[cantidad, division])
for i=1:division
name=['archivo',num2str(i),'.txt'];
fid=fopen(name,'w');
fprintf(fid,'%f\n',D(:,i));
fclose(fid);
end
>> guardar_archivo_texto
D =
1 11 21 31 41 51 61 71 81
2 12 22 32 42 52 62 72 82
3 13 23 33 43 53 63 73 83
4 14 24 34 44 54 64 74 84
5 15 25 35 45 55 65 75 85
6 16 26 36 46 56 66 76 86
7 17 27 37 47 57 67 77 87
8 18 28 38 48 58 68 78 88
9 19 29 39 49 59 69 79 89
10 20 30 40 50 60 70 80 90