funinterpoint.m

来自「相关积分计算matlab程序」· M 代码 · 共 22 行

function InterPoint = FunInterpoint(m,tao,Serial)
% output -Interpoint:相空间中的两点距离（即相空间矢量的距离）序列，
% 采用欧氏范数距离

%----------------- reconstruct phase space------------------
n = length(Serial);
N = n - (m-1)*tao;
for i = 1:N
    for j = 1:m
        PS(i,j) = Serial(i+(j-1)*tao);
    end
end
%----------------interpoint distance---------------------
InterPoint = [];
N = size(PS,1);
for i=1:N
    for j=i+1:N
        D = norm(PS(i,:) - PS(j,:),2);
        InterPoint = [InterPoint,D];
    end
end