clear all
data=load('a.txt')
N=length(data)%数据组的大小
max_d=20%时间延时的最大值
sigma=std(data)%计算时间序列的标准差sigma
%求s(t),delt_s(t),s_cor(t)
for t=1:max_d
t
s_t=0
delt_s_s=0
% S对m求和,即s_t
for m=2:5
s_t1=0
%对rj求和,即s_t1
for j=1:4
r=sigma*j/2
data_d=disjoint(data,N,t)%将时间序列分解成t个不相交的时间序列
[ll,N_d]=size(data_d)%子序列的长度
s_t3=0
%计算t个不相关的时间序列的和
for i=1:t
i
Y=data_d(i,:)%时间序列
C_1(i)=correlation_integral(Y,N_d,r)%计算C(1,N_d,r,t)
X=reconstitution(Y,N_d,m,t)%相空间重构
N_r=N_d-(m-1)*t
C_I(i)=correlation_integral(X,N_r,r)%计算C(m,N_r,r,t)
s_t3=s_t3+(C_I(i)-C_1(i)^m)%对t个不相关的时间序列求和
end
s_t2(j)=s_t3/t
s_t1=s_t1+s_t2(j)%对rj求和, s_t1即S(m,r,t)
end
delt_s_m(m)=max(s_t2)-min(s_t2)%求delt S(m,t)
delt_s_s=delt_s_s+delt_s_m(m)%delt S(m,t)对m求和
s_t0(m)=s_t1
s_t=s_t+s_t0(m)%S对m求和
end
s(t)=s_t/16%寻找s(t)的第一个零点去发现时间序列独立的第一个局部最大值
delt_s(t)=delt_s_s/4%寻找delt_s(t)的第一个极小值去发现时间序列独立的第一个局部最大值
s_cor(t)=delt_s(t)+abs(s(t))%寻找s_cor(t)的最小值去发现时间序列独立的第一个整体最大值窗口
end
function X=reconstitution(data,N,m,tau)%该函数用来重构相空间
% m为嵌入空间维数
% tau为时间延迟
% data为输入时间序列
% N为时间序列长度
% X为输出,是m*n维矩阵
M=N-(m-1)*tau%相空间中点的个数
for j=1:M %相空间重构
for i=1:m
X(i,j)=data((i-1)*tau+j)
end
end
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)