How to find the lines of two words repeated many times in a .txt file

1 次查看(过去 30 天)
I'm trying to find a two words (DATA & END ) repeated many times in a .txt file how I can get their positions or in any lines they are exist because I want to bring the numbers which are between these two words
this is a part of the file
-- Coefficient of friction (for calculation of temperature) -- SchmierTyp 0:Oil 1:Grease 2:Dry :TABLE FUNCTION ReibKoef INPUT X SchmierTyp TREAT
DATA
1 2 3
0,01 0,02 0,03
END
-- Coefficient of friction (for calculation of temperature) -- SchmierTyp 0:Oil 1:Grease 2:Dry :TABLE FUNCTION ReibKoef INPUT X SchmierTyp TREAT
DATA
1 2 3
0,01 0,02 0,03
END
and I'm trying to do this by typing
haystack = fopen('h1.dat','r');
needle = 'DATA';
line = 0;
found = false;
while ~feof(haystack)
tline = fgetl(haystack);
line = line + 1;
if ischar(tline) && ~isempty(strfind(tline, needle))
found = true;
break;
end
end
if ~found
line = NaN;
end
Thanks in advance
  2 个评论
Guillaume
Guillaume 2014-10-23
At first glance, your code looks correct. It will find the first line that contains 'DATA'. So what exactly is the problem you are having?
Abdelhadi To'ma
Abdelhadi To'ma 2014-10-23
I want to find all the lines that have DATA and END to be able to extract the numbers between the DATA and the END lines

请先登录,再进行评论。

采纳的回答

Michael Haderlein
Michael Haderlein 2014-10-23
You just have to extend your if-structure:
if ischar(tline)
if found
if strcmpi(tline,'END')
found=false;
else
mydata(end+1,:)=str2num(tline);
end
else
if strcmpi(tline,needle)
found=true;
end
end
end
I cannot test this code right now, but it should at least serve well as starting point. Of course, you have to initialize mydata at the beginning (mydata=[];).
  1 个评论
Abdelhadi To'ma
Abdelhadi To'ma 2014-10-23
thanks a lot for your help but I think that I have found a good way for doing it
fid = fopen('h1.dat', 'rt');
s = textscan(fid, '%s', 'delimiter', '\n');
idx1 = find(strcmp(s{1}, 'DATA'), :, 'first');
idxx1 = find(strcmp(s{1}, 'END'), :, 'first');
buffer = s{1}(idx1(1,1)+1:idxx1(1,1)-1);
dataTxt = sprintf('%s\n',buffer{:});
data = textscan(dataTxt,'%f %f %f');
d=cell2mat(data);
fclose(fid);

请先登录,再进行评论。

更多回答(0 个)

类别

Help CenterFile Exchange 中查找有关 Data Import and Analysis 的更多信息

标签

Community Treasure Hunt

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

Start Hunting!

Translated by