calc_alpha.m

来自「Markov分析的matlab工具包」· M 代码 · 共 31 行

function [result] = calc_alpha(P)   %辅助计算P矩阵的alpha值

%
%   随机数学(30250143, 07Fall) 大作业程序
%   
%   作者： 王  音 2004011448 
%         葛元恺 2004011425 <[e-mail]>
%
%   All rights reserved. 2008.1

[m n] = size(P);

if m~=n,
    error('P must be a square-matrix (m=n)');
end

min_sum = 1;

for i=1:(n-1),
    for j=(i+1):n,
        min_sum = min(sum(min(P(i,:),P(j,:))),min_sum);
    end
end

result =  min_sum;