Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/66.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 如何从最上面的5%加权边保留或创建新网络？_R_Networking_Igraph_Edges - Fatal编程技术网
Fatal编程技术网
  • r/
  • R 如何从最上面的5%加权边保留或创建新网络？

R 如何从最上面的5%加权边保留或创建新网络？

r networking

R 如何从最上面的5%加权边保留或创建新网络？,r,networking,igraph,edges,R,Networking,Igraph,Edges,我试图将一个大型网络减少到其边缘的前5%，这是由边缘权重决定的 我通常通过声明边缘权重的截止点来修剪网络，如下所示： g2 <- delete.edges(g1, E(g1) [weight<20]) g2没有发布示例，只提供了最少的代码，我担心仅仅提供“权重”可能会隐藏attach的使用。也许： g2 <- delete.edges(g1, E(g1) [ weight < quantile(weight, 0.95) ]) g2您可以使用quantile（）计算5

我试图将一个大型网络减少到其边缘的前5%，这是由边缘权重决定的

我通常通过声明边缘权重的截止点来修剪网络，如下所示：

g2 <- delete.edges(g1, E(g1) [weight<20])

g2没有发布示例，只提供了最少的代码，我担心仅仅提供“权重”可能会隐藏
attach
的使用。也许：


g2 <- delete.edges(g1, E(g1) [ weight < quantile(weight, 0.95) ])



g2您可以使用
quantile（）
计算5%分位数（分为5%和95%的值），然后将其用作分界点。

g2 <- delete.edges(g1, E(g1) [ weight < quantile(weight, 0.95) ])