幂律分布的pagerank拟合结果

Question

我已经计算了一个网站的超级链接网络(大约1000个节点)的pagerank值。我在R中用igraph软件包做了这件事。

我现在想采取前10名的pagerank值，并可视化这些前10大网站的幂律图，给出一个想法，他们在图表中所处的位置。

我将如何获取这些结果，并根据幂律图绘制它们(例如，说明哪些站点在长尾更远的位置)。

我只是想找出一个一般的公式或技巧。

这些数值如下：

0.0810
0.0330
0.0318
0.0186
0.0161
0.0160
0.0158
0.0149
0.0136
0.0133

Answer 1

我这样做的方法是绘制连通性的密度，并将图与前10点叠加起来。

假设您已经拥有了所有节点的连接性：

d <- density(connectivity)
top10 <- sort(connectivity, decreasing=TRUE)[1:10]

# get the height of the density for each of the top10 nodes:
top10y <- sapply(top10, function(node) {
  diffs <- abs(node - d$x)
  yloc <- which(diffs == min(diffs))[1] # in case more than one match
  d$y[yloc]
})

# now plot
plot(d)
points(top10, top10y, col="red")

例如，我模拟了1000个节点的连通性，以遵循正态分布：

​

​