PageRank 的收敛性
在本练习中，您将通过绘制相邻两次迭代差异的图形，直观检查 PageRank 的收敛情况。
本练习是课程的一部分
使用 R 进行网络数据的预测分析
练习说明
- 创建一个名为
value的空向量。 - 编写一个包含 15 步的
for循环。循环的每一步中，使用i次迭代计算network的 PageRank 值。使用cbind()将其vector属性作为一列添加到value中。 - 计算
value中每一对相邻 PageRank 向量的绝对差，并赋值给difference。 - 绘制
difference向量的图形，以检查 PageRank 值的收敛情况。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Create an empty vector
___ <- c()
# Write a loop to compute PageRank
for(i in 1:___){
value <- cbind(value, page.rank(___, algo = 'power',options = list(niter = ___))$vector)
}
# Compute the differences
difference <- colSums(abs(___[,1:14] - ___[,2:15]))
# Plot the differences
___(1:14, difference)