论坛 › 数学与非线性科学 › 混沌时间序列的最大李雅普诺夫指数问题

原来是小飞 发表于 2013-11-11 16:46

混沌时间序列的最大李雅普诺夫指数问题

使用程序运行出了最大李雅普诺夫指数的图片，但不知道如何从图片中看出最大李雅普诺夫指数，特此请教帮助，图片和代码如下：clear all;
data=load('b.txt');
N=length(data);
m=2;
tau=6;
P=6;
delt_t=1;
Y=reconstitution(data,N,m,tau );%reconstitute state space
M=N-(m-1)*tau;%M is the number of embedded points in m-dimensional space
for j=1:M
    d_max=1e+100;
    for jj=1:M                                              %寻找相空间中每个点的最近距离点，并记下
      d_s=0;                                              %该点下标
      if abs(j-jj)>P                                    %限制短暂分离
            for i=1:m
                d_s=d_s+(Y(i,j)-Y(i,jj))*(Y(i,j)-Y(i,jj));
                d_min=d_max;
                if d_s<d_min
                   d_min=d_s;
                   idx_j=jj;
               end
            end
      end
    end
%   index(j)=idx_j;
    max_i=min((M-j),(M-idx_j));%计算点j的最大演化时间步长i
    for k=1:max_i            %计算点j与其最近邻点在i个离散步后的距离
      d_j_i=0;
      for kk=1:m
            d_j_i=d_j_i+(Y(kk,j+k)-Y(kk,idx_j+k))*(Y(kk,j+k)-Y(kk,idx_j+k));
            d(k,j)=d_j_i;
      end
    end
end

%对每个演化时间步长i，求所有的j的lnd(i,j)平均
=size(d);
for i=1:l_i
    q=0;
    y_s=0;
    for j=1:l_j
      if d(i,j)~=0
            q=q+1;
            y_s=y_s+log(d(i,j));
      end
    end
    y(i)=y_s/(q*delt_t);
end
x=1:length(y);
pp=polyfit(x,y,1);
lambda_1=pp(1);
yp=polyval(pp,x);
plot(x,y,'-o',x,yp,'--');grid on图片如下：

huadianlizhan 发表于 2014-12-11 23:08

为啥不行那/

查看完整版本: 混沌时间序列的最大李雅普诺夫指数问题