附录
15个学生的信息： 校内竞 考勤 模拟 学生 专业 知识面 思维敏捷 其它情况 赛获奖 记录 成绩 S1 信计 二等奖 10 96 A A S2 计科 二等奖 15 93 B A 过计算机三级 S3 机制 成功参赛奖 12 92 C C S4 机制 二等奖 12 82 A B 上过建模选修课 S5 信计 三等奖 8 82 B B S6 信工 二等奖 15 82 D A S7 土木 二等奖 14 80 B C S8 软件 二等奖 12 79 A A 考过程序员 S9 信计 三等奖 12 78 C A 学过MATLAB S10 国经 二等奖 14 77 B A 学过MATLAB S11 生计 一等奖 15 76 B C S12 生计 三等奖 10 74 A A S13 土木 一等奖 10 78 D B S14 机电 二等奖 14 76 A A S15 机电 二等奖 15 66 B C
程序：
clear all close all clc
?1 2 3 4 5 6 ??1/2 1 2 3 4 5????1/3 1/2 1 2 3 4?a=??
1/4 1/3 1/2 1 2 3???1/5 1/4 1/3 1/2 1 2????1/6 1/5 1/4 1/3 1/2 1?n=6;
%第一步：每一列向量标准化
for i=1:n for j=1:n x=0; for k=1:n x=x+(a(k,j)); end
b(i,j)=a(i,j)/x; end
11
end b;
%第二步：按行相加
for i=1:n y=0; for j=1:n y=y+b(i,j); end c(i,1)=y; end c;
%第三步：得到特征向量
for i=1:n
w(i,1)=c(i)/sum(c); end w
%第四步：求AW
AW=a*w;
%第五步：计算最大特征值r=0; for i=1:n
r=r+1/n*AW(i)/w(i); end r
%计算一致性指标CI
CI=(r-n)/(n-1)
%计算随机性指标RI
if (n==6) RI=1.24; end RI
%计算一致性检验CR CR=CI/RI
12