?? gp.m
字號:
function D=GP(m,N)
D=0;DC=0;
re=100;%the begining error
for r=0.31:-0.005:0
C=0.01;
for j=1:N
for k=j+1:N
C=C+H(r-d(y(j,:)-y(k,:),m));
end
end
C=2*C/(N*(N-1));
C=log(C)/log(r);
error=abs(C-D)+abs(D-DC);
diffca=abs(((C-D)-(D-DC))/0.005);
diff=abs((C-D)/0.005)+abs((D-DC)/0.005);
if(error>re|diff<O.O5l|diffca<0.02|error<0.04)
%stop threshold
end
re=6*error; %exchanging error
DC=D
end
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -