我正在尝试将大型网络减少到仅前 5% 的边，这由边权重决定。
我通常通过声明边权重的截止点来修剪我的网络，如下所示:
g2 <- delete.edges(g1, E(g1) [weight<20])
有没有办法根据权重删除下部 95% 的边缘，例如:
g2 <- delete.edges(g1, E(g1) [weight outside the top 5%])
或者以其他方式提取前 5%？
最佳答案
没有发布示例，只提供了最少的代码，我担心仅提供“权重”可能会隐藏 attach 的使用。也许:
g2 <- delete.edges(g1, E(g1) [ weight < quantile(weight, 0.95) ])
关于r - 如何从权重最高的 5% 边缘保留或创建新网络？，我们在Stack Overflow上找到一个类似的问题： https://stackoverflow.com/questions/16286650/