www.gusucode.com > 用matlab实现了五类灰色关联度模型的计算源码程序 > grey_model/gld_deng.m
% 邓氏关联度 % P12 -- The Study on the Grey Relational Degree and Its Application function r1 = gld_deng(x) s = size(x); len = s(2); num = s(1); ro = 0.5; % 无量纲化 for i = 1: num x(i,:) = x(i,:)./x(i,1); end % 求差序列 dx(num,len) = 0; for i = 2 : num for k = 1 : len dx(i,k) = abs(x(1,k) - x(i,k)); end end % 求两极最大差与最小差 max_dx = max(max(dx)); min_dx = min(min(dx)); % 计算关联系数 r(1,1:len-1) = 1; for i = 2 : num for k = 1 : len r(i,k) = (min_dx + ro*max_dx)/(dx(i,k) + ro*max_dx); end end % 计算关联度 r1 = sum(r(2:num,:),2)/(len);