计算R中边连接的其他边的总数？

Question

我想找到一种方法来计算网络中所有边缘附加主边缘的其他边缘的总数，并使用igraph（或任何其他包）将其设置为R中每个边缘的属性

据我所知，igraph包中有各种可以完成工作的工具。作为包装的新手，我不确定哪种功能组合会给我所需的输出。

我猜工作流程看起来像下面的

获取图表

g <- sample_gnp(10, 1/10)

将vertex属性设置为等于

g %>% set_vertex_attr("deg", value = degree(g))
# of course, this doesn't work. So sorry, I'm new to igraph

编写一个函数来执行以下

edge attribute = (total sum of the degree of connected vertices) - (the number of connected vertices) 

任何帮助将不胜感激

Answer 1

您可以使用

设置顶点属性

degrees <- degree(gr)
gr <- set_vertex_attr(gr, name="degr", value=degrees)

并计算第二个任务可能就像这样

sum(degrees) - sum(degree > 0)