%e259vpr.m

%load /data/cashjian/vpr/data/e259v910cam2all_final

fid1=fopen('/data12/sodata/cashjian/myout.txt','w');

%for i=1:length(variables)
%    fprintf(fid1,'%-7s  ',variables(i,:));        
%end

%Problem here is no matter what my format statement says, I have to load in 25 columns to get all the words.  Then all the
%columns are printed.

%for i=1:length(variables)
%    fprintf(fid1,'%9s\t%9s\t%10s\t%3s\t%6s\t%6s\t%6s\t%5s\t%5s\t%8s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t%6s\t',variables(i,1:25));
%   fprintf(fid1,'%9s\t%9s\t%10s\t%3s\t',variables(i,1:25));
%end

%fclose(fid1);

%fid1=fopen('myout.txt','a');

%fprintf(fid1,'\n');

%for i=1:20    
%    fprintf(fid1,'%9.6f\t%9.6f\t%10.6f\t%3.1f\t%6.3f\t%6.3f\t%6.3f\t%5.3f\t%5.3f\t%8.4f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t%4.2f\t %4.2f\t',e259v910cam2all(i,:));
%    fprintf(fid1,'\n');
%end

for i=1:length(b)    
    fprintf(fid1,'%7.4f\t%6.4f\t%6.4f\t%7.3f\t%5.4f\t%5.3f\t%5.3f\t%5.4f\t%5.4f\t%5.1f\t',b(i,:));
    fprintf(fid1,'\n');
end

fclose(fid1);