function?SampEnVal?=?SampEn（data?m?r）
%?SAMPEN??計(jì)算時(shí)間序列data的樣本熵
%?輸入：data是要分析的一維行向量，data為輸入數(shù)據(jù)序列向空間重構(gòu)的時(shí)間延遲默認(rèn)為1，
%???????m重構(gòu)維數(shù)，一般選擇1或2，優(yōu)先選擇2，一般不取m>2
%???????r?閾值大小，一般選擇r=0.1~0.25*Std（data）
%?輸出：SampEnVal樣本熵值大小
%?$Author:?lskyp
%?修改：yuhansgg
%?$Date:???2018.03.05
%?Orig?Version:?V1.0--------分開計(jì)算長度為m的序列和長度為m+1的序列
%???????????????????????????這一版的計(jì)算有些問題，需要注意兩個(gè)序列總數(shù)都要為N-m
%?Modi?Version:?V1.1--------綜合計(jì)算，計(jì)算距離時(shí)通過矩陣減法完成，避免重循環(huán)
%?V1.1?Modified?date:?2018.03.05
%?樣本熵公式參考論文：《A?review?on?sample?entropy?applications?for?the?non-invasive?analysis?of?atrial?fibrillation?electrocardiograms》

data?=?data（:）‘;
N?=?length（data）;
Nkx1?=?0;
Nkx2?=?0;

%?分段計(jì)算距離，x1為長度為m的序列，x2為長度為m+1的序列

for?k?=?N?-?m:-1:1
????x1（k?:）?=?data（k:k?+?m?-?1）;
????x2（k?:）?=?data（k:k?