Removing certain lines in a text file by setting a restriction

1 次查看（过去 30 天）

jgillis16 2015-6-17

0
链接

此问题的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/224231-removing-certain-lines-in-a-text-file-by-setting-a-restriction

评论： Star Strider 2015-6-18

copiedlines.txt

I am trying to remove certain lines of text in a file by setting the restriction that the 15th column of the each line can only go up to the numerical value of '21'.

For example:

13|PGC000013|0.00370|33.13420|~|15.41|0.675|0.217|0.587|~|0.87|0.102|~|-18.94|72.722|10.908|0.40|0.41|

has a value of '72.722', which is more than the '21' cutoff threshold so it would be eliminated.

My file is attached.

采纳的回答

Star Strider 2015-6-17

0
链接

此回答的直接链接

https://ww2.mathworks.cn/matlabcentral/answers/224231-removing-certain-lines-in-a-text-file-by-setting-a-restriction#answer_183010

编辑：Star Strider 2015-6-17

在 MATLAB Online 中打开

This works, and it’s relatively fast:

fidi = fopen('jgillis16 copiedlines.txt','rt');
Glxc  = textscan(fidi, '%s', 'HeaderLines',1, 'Delimiter','|');
frewind(fidi)
Glxcs = textscan(fidi, '%s', 'EndOfLine','\r\n');
fclose(fidi);
dlen = 18*fix(length(Glxc{:})/18);                          % Set Row Length
Glxcr = reshape(Glxc{:}(1:dlen), 18, [])';                  % Reshape & Transpose
Idx = cellfun(@(x) str2num(x) <= 21, Glxcr(:,15), 'Uni',0); % Find Rows With Col18 <= 21 To Retain & Write To New File
LIdx = logical(cell2mat(Idx));                              % Logical Array From Cell
NewGlxc = Glxcs{:}(LIdx,:);                                 % Rows Of New Array

You would then write the ‘NewGlxc’ array to your file. (I would save it as a .mat file if it is only for MATLAB use.)

EDIT — To write it to a text file:

fido = fopen('NewGalaxy.txt','wt');
fprintf(fido, '%s\n', NewGlxc{:});
fclose(fido);

8 个评论
显示 6更早的评论隐藏 6更早的评论

Star Strider 2015-6-18

在 MATLAB Online 中打开

NewGalaxy.txt

Sure. To be certain we’re running the same code, this produced the attached file:

fidi = fopen('jgillis16 copiedlines.txt','rt');
Glxc  = textscan(fidi, '%s', 'Delimiter','|');
frewind(fidi)
Glxcs = textscan(fidi, '%s', 'EndOfLine','\r\n');
fclose(fidi);
dlen = 18*fix(length(Glxc{:})/18);                          % Set Row Length
Glxcr = reshape(Glxc{:}(1:dlen), 18, [])';                  % Reshape & Transpose
Idx = cellfun(@(x) str2num(x) < 21, Glxcr(:,15), 'Uni',0);  % Find Rows With Col15 < 21
LIdx = logical(cell2mat(Idx));                              % Logical Array From Cell
NewGlxc = Glxcs{:}(LIdx,:);                                 % Rows Of New Array
fido = fopen('NewGalaxy.txt','wt')
fprintf(fido, '%s\n', NewGlxc{:});
fclose(fido)

I opened and checked the file in ‘Notepad’. When I counted through and randomly checked ‘Column 15’ in various lines (rows), all the values were <21. (I have an additional path detection and creation line that I incorporate into the fopen call that I do not include here, but that doesn’t affect the file contents.)

Apologise for the delay. It’s GMT-6 here, so my morning is just now starting.

jgillis16 2015-6-18