Effacer les filtres
Effacer les filtres

add new column into existing text file

2 vues (au cours des 30 derniers jours)
joo tan
joo tan le 12 Déc 2011
i have 10 file and every file have 1 column data..i want to extract the column from all file and write into first file ..so, finally, in the first file, i will have ten column data..i try use load and fprint..i can load the column but when i try to write into file, the data is continues..not became as column..so, can someone help me??

Réponses (1)

Walter Roberson
Walter Roberson le 12 Déc 2011
You cannot add a column to a text file by opening it with 'a' (append) access. You must re-write the entire text file to have everything it had before as well as the new column.
However, if all of the data files have the same number of columns, it is easier to read all the data in first and then to write it out in one step.
[Code revised to make it much more robust]
magiclen = 6625;
magiccol = 5;
n ='average.txt';
files = dir('*.txt');
%the file average.txt might have been detected by dir() so remove it
tf = arrayfun(@(K) strcmp(n, files(K).name), 1:length(files));
files(tf) = [];
nfile = length(files);
if nfile == 0
error('There were no files found');
end
if nfile == 1;
warning(sprintf('Only one file found, only one column of output expected: %s', files(1).name);
end
Lat = zeros(magiclen, nfile)
for F = 1:nfile
thisfile = files(F).name;
try
f = load(thisfile);
catch me
%if there was a load problem, say so
error(sprintf('Failed loading file %s', thisfile));
end
if any(size(f) < [magiclen,magiccol])
error(sprintf('File %s loaded but is too small, only (%d by %d) but need (%d+ by %d+)', thisfile, size(f,1), size(f,2), magiclen, magiccol));
end
Lat(1:magiclen,F) = f(1:magiclen, magiccol);
end
fmt = ['\n' repmat('%15.6f', 1, nfile) '\n'];
fid = fopen(n, 'wt')
fprintf(fid, fmt, Lat.' ); %the .' is important!
fclose(fid);
Note the complete lack of a loop in writing out the data after it has all been read in.
Computing the format and using .' on the array to write out are tricks of the trade -- things that are not obvious until you have worked with MATLAB enough that suddenly they are obvious.
  7 commentaires
Walter Roberson
Walter Roberson le 13 Déc 2011
Sorry, yes, it was a typo, now corrected.
Mario
Mario le 8 Mai 2013
Excellent, this code fits perfectly. Thanks Walter!

Connectez-vous pour commenter.

Catégories

En savoir plus sur MATLAB dans Help Center et File Exchange

Community Treasure Hunt

Find the treasures in MATLAB Central and discover how the community can help you!

Start Hunting!

Translated by