如何把以下的for循环向量化，以提高运行的速度
本帖最后由 原来是小飞 于 2013-10-23 09:17 编辑请高手帮帮忙，谢谢了。function =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个不相交的时间序列
=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,'*')
运行效率可参看
1.[原创] 提高matlab运行速度的一点心得 http://forum.vibunion.com/thread-25305-1-1.html
[原创] 提高matlab运行速度的一点心得(之二) http://forum.vibunion.com/thread-26449-1-1.html
[原创]提高matlab运行速度和节省空间的一点心得(之三) http://forum.vibunion.com/thread-33199-1-1.html
[原创]关于Profiler的介绍和使用心得 http://forum.vibunion.com/thread-32293-1-1.html
如何获取程序运行的时间 http://forum.vibunion.com/thread-16517-1-1.html
from http://home.vibunion.com/blog-63979-18250.html
页:
[1]