Найти меру несогласованности
парных сравнений
эксперта.
Решение:
Решение будет производиться с помощью математического пакета Maple.
> restart:
> Digits:=6:
> with(linalg):
> A:=<<1 | 1/2 | 1/5 | 1/7>,<2 |1 | 1/5 | 1/6>,<5 |5 |1 | 1/5>,<7 | 6 | 5 | 1>>;
> Z:=evalf(eigenvectors(A)); -найдем собственные числа и вектора матрицы.
> k:=1: -выбираем максимальное собственное число (4,28561) и соответствующий ему вектор.
n:=4:
> Delta:=Z[k][1]-n; - мера несогласованности.
> s:=sum(op(Z[k][3])[i],i=1..n);
> b:=seq(op(Z[k][3])[i]/s,i=1..n); - нормированные элементы собственного вектора.
> sum(b[i],i=1..n); -сумма нормированных элементов собственного вектора должна быть равна 1.