多尺度排列熵matlab程序，亲测可用

function E=MPE（iSigms）
% iSig: input signal; m : embedded dimension; % s: scale number
for i=1:1:s %i : scale index
    oSig=CoarseGrain（iSigi）; E（i）=PE（oSigm）;
end
%Coarse Grain Procedure. See Equation （11） % iSig: input signal ; s : scale numbers ; oSig: output
function oSig=CoarseGrain（iSigs）
    N=length（iSig）; %length of input signal
for i=1:1:N/s
    oSig（i）=mean（iSig（（i-1）*s+1:i*s））;
end
% function to calculate permutation entropy % signal: input signal; m: embedded dimension
function E=PE（sigm）
N=length（sig）; %length of signal
v=[1:m]; % m=3 v=[1 2 3]; m=5 v=[1 2 3 4 5]
all_pemu=perms（v）; % generate all possible permutations
perm_num=factorial（m）; % calculate m! to obtain the number of all possible permutations
for i=1:1:perm_num
    key（i）=genkey（all_pemu（i:））; %transform a vector into an integer; ex