突然需要用Matlab來處理一下文字，查詢Help找到一些相關函式。對cell，string的理解還是不夠，花費了相當長時間來轉換。另外值得一提的是正則表示式功能極其強大，太好用了！！

需要特別注意的技巧用高亮顯示了。

%% 這段程式搜尋baseDir下的（包含子資料夾下）的txt檔案，提取其中第一行，並存儲在dataFile的文字檔案中


clear;
clc;


%設定搜尋路徑
baseDir='E:\fapb0';
<span style="background-color: rgb(255, 255, 51);">subdir=genpath(baseDir)</span>;%列出目錄下的所有字目錄
<span style="background-color: rgb(255, 255, 51);">filedir=regexp(subdir,';', 'split')</span>;%把目錄轉換成一個cell


%設定儲存的文字檔案
dataFile='E:\data.txt';
fidd=fopen(dataFile,'a');


%提取並存儲
for i=1:(length(filedir)-1)
    
    %得到檔名
    data_fn=dir([filedir{i},'\*.txt']); 
    length=size(data_fn,1);
    
    %提取每個檔案第一行並存儲
    for j=1:length
        filename=[char(filedir(i)),'\',data_fn(j).name];
        fid2=fopen(filename,'r');
        content=fgetl(fid2);
        fclose(fid2);
        
        %用正則表示式提取只含字母和' ','-','\''的字元
        <span style="background-color: rgb(255, 255, 51);">index=regexpi(content,'[a-z- '']')</span>;% '' 表示一個'字元
        <span style="color:#333333;background-color: rgb(255, 255, 51);">content2store=content(index);</span>
        
        fprintf(fidd,'%s',filename);
        fprintf(fidd,'  %s\r\n',content2store); % Windows下需要\r\n
    end
end


fclose(fidd);
fclose('all');