R语言网络分析友谊悖论案例

拓端

发布于 2020-11-30 10:30:37

5230

发布于 2020-11-30 10:30:37

文章被收录于专栏：拓端tecdat拓端tecdat

本文简要介绍一下网络分析，我想提供一些有关“友谊悖论”的R语言例证。友谊悖论指出

平均而言：你的朋友比你拥有更多的朋友

例如，这在 Feld（1991），Zuckerman＆Jost（2001）中进行了讨论。首先，让我们获取数据集的副本




library(networkD3)
simpleNetwork(data[,1:2]

考虑无向图中的顶点v∈V，G =（V，E）（使用经典图形符号），并令d（v）表示它的边数（即v具有d（v）个朋友）。图中随机人的平均好友数为

从而，

方差分解

回到我们的网络。节点列表是




rbind(as.matrix(GoT[,1:2]),as.matrix(GoT[,2:1])
unique(M[,1]

我们每个人都可以得到朋友列表和朋友数量



as.character(M[which(M[,1]==x),2]
Vectorize(function(x) length(friends(x)

以及朋友拥有的朋友数量，以及平均的朋友数量


(Vectorize(function(x) length(friends(x)))(friends(y
Vectorize(function(x) mean(friends_of_friends(x

我们可以查看一个随机节点的朋友数量的密度，




lines(density(Nb),col="red",
lines(density(Nb2),col="blue",

我们还可以计算平均值




mean(Nb)
[1] 6.579439
mean(Nb2)
[1] 13.94243

因此，实际上，人们平均拥有的朋友少于他们的朋友。

本文参与腾讯云自媒体分享计划，分享自微信公众号。

原始发表：2020-11-20，如有侵权请联系 cloudcommunity@tencent.com 删除

本文分享自拓端数据部落微信公众号，前往查看

如有侵权，请联系 cloudcommunity@tencent.com 删除。

本文参与腾讯云自媒体分享计划，欢迎热爱写作的你一起参与！

登录后参与评论

0 条评论

热度