% 平均位移法求時延% 使用平臺 - Matlab6.5 / Matlab7.0% 作者：陸振波，海軍工程大學% 歡迎同行來信交流與合作，更多文章與程序下載請訪問我的個人主頁% 電子郵件：luzhenbo@yahoo.com.cn% 個人主頁：http://luzhenbo.88uu.com.cnclcclearclose all%---------------------------------------------------% 產生 Lorenz 時間序列sigma = 16;         % Lorenz 方程參數 a = 16 | 10b = 4;              %                 b = 4 | 8/3r = 45.92;          %                 c = 45.92 | 28        y = [-1,0,1];       % 起始點 (1 x 3 的行向量)h = 0.01;           % 積分時間步長k1 = 30000;          % 前面的迭代點數k2 = 10000;          % 后面的迭代點數z = LorenzData(y,h,k1+k2,sigma,r,b);X = z(k1+1:end,1);%---------------------------------------------------% 平均位移法 (已知 m,求 tau)% 當波形斜率第一次降為初始斜率的 0.4 以下時的 tau 即為所求 (tau 從 1 開始)maxLags = 100;m = 3;IsPlot = 1;tau_AverageDisplacement = AverageDisplacement(X,maxLags,m)