readprocess.m

来自「希尔伯特黄变换的程序源码」· M 代码 · 共 31 行

function readprocess(file)

fid=fopen(file,'rt');

if(fid==-1)

    display('File not exist!');

    return;

end

array=[];

while(~feof(fid))

    str=fscanf(fid,'%s',1);

    if(length(str)>10)

        %d+00005.00;v+00002.72;e+00002.28;u-0007;m+0761;t+0295;

        col=sscanf(str,'d%f;v%f;e%f;u%f;m%d;t%d;');

        array=[array col];

    end

end