马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有账号？我要加入
x
本帖最后由 原来是小飞 于 2013-10-22 20:49 编辑
在用cc方法求混沌时间序列的时延和嵌入维数时，由于用了好多循环，程序运行好慢，请教怎样可以加快运行速度。以下代码为cc方法：- function [s,delt_s,s_cor]=C_CMethod(data)
- %该函数利用C-C方法计算时间延时和嵌入维数
- %Method,which proved by H.S.Kim
- %skyhawk&flyinghawk
- % %****************调试程序段****************************
- %clear all;
- %data=load('chen.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
- fid=fopen('result.txt','w');%打开result.txt,'w'表示对打开的文件写数据
- fprintf(fid,'%f %f %f %f/n',t,s(t),delt_s(t),s_cor(t));%将矩阵t,s(t),delt_s(t),s_cor(t)的列向量以浮点格式%f %f %f %f/n写入到
- %文本文件result.txt
- fclose(fid);%关闭文件
- t=1:max_d;
- plot(t,s,t,delt_s,'.',t,s_cor,'*')
|
发表于 2013-10-22 15:32
提升卡
变色卡
显身卡
发表于 2013-10-23 14:33
楼主
