PageRankMATLAB实现-创新互联
PageRank
参考http://www.doc88.com/p-11465283738.html

G = [0 1 1 0 1 1 0;
1 0 1 1 0 0 0;
1 0 0 1 1 0 0;
1 0 0 0 1 0 0;
1 0 0 1 0 1 1;
0 0 0 1 1 0 0;
1 0 0 0 0 0 0];
[n,n] = size(G);
p = 0.85
delta = (1-p)/n;
sn = sum(G,1); %按列求矩阵G的列和
D = diag(1./sn);
A = p*G*D + delta;
%幂迭代法
x = ones(n,1)/n; %迭代初始向量
z = zeros(n,1);
cnt = 0; %记录迭代步数
while max(abs(x-z)) > 0.0001
z = x;
x = A * x;
cnt = cnt + 1;
end
[x1,index] = sort(x);
x1 = flipud(x1);
index = flipud(index);
out = [1:n;x1';index'];
fprintf('迭代步数 = %d\n',cnt)
str1 = '排名';str2 ='PageRank得分'; str3 = '序号';
fprintf('%-6s %-15s %-5s\n',str1,str2,str3);
fprintf('%-6d %-15f %-5d\n',out);结果
p = 0.8500 迭代步数 = 11 排名 PageRank得分 序号 1 0.276926 1 2 0.185228 5 3 0.147001 2 4 0.130779 3 5 0.107858 4 6 0.083714 6 7 0.068494 7
另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。
网页标题:PageRankMATLAB实现-创新互联
浏览路径:http://www.jxjierui.cn/article/ddiocp.html


咨询
建站咨询
