|
今天有点儿时间,就写了个小函数,lz测试测试吧,不行再改改。水平有限,所以写的有点儿繁,中间的循环应该还可以简化。
- function fenci(iFile,oFile,pstr)
- try
- fid=fopen(iFile);
- C=textscan(fid,'%s ');
- fclose(fid);
- T='';
- for i=1:length(C{1,1})
- T=[T,' ',C{1,1}{i,1}];
- end
- m1=regexpi(T,'\.','start');
- s{1,:}=T(1:m1(1));
- for i=1:length(m1)-1;
- s{i+1,:}=T(m1(i)+1:m1(i+1));
- end
- cc=regexpi(T,pstr,'start');
- count=length(cc);
- r=regexpi(s,pstr,'start');
- fido=fopen(oFile,'w');
- fprintf(fido,'%g\n',count);
- for i=1:length(r)
- if ~isempty(r{i,1})
- fprintf(fido,'%s\n',s{i,1});
- end
- end
- fclose(fido);
- disp([oFile,' generated successfully!'] )
- disp('Finished!')
- catch
- error('Unkonwn Error');
- end
-
复制代码
testscrpit
- clear
- clc
- iFile='input2.txt';
- oFile='output2.txt';
- pstr='house';
- fenci(iFile,oFile,pstr)
复制代码 |
评分
-
2
查看全部评分
-
|