開始使用免費開始

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)
編輯並執行程式碼