如何解决R中的delete_vertices igraph
我需要从图中删除节点数最多的组。我尝试使用 delete_vertices(name_of_graph,nodes_to_remove),但是如何指示要删除的节点? 前任。我有 5 个组,分别有 6、19、27、11 和 18 个节点。所以我需要删除27个节点的组,我该怎么做?
解决方法
您可以使用 delete.vertices()
函数,您可以指定图的名称和要删除的节点的名称。
set.seed(666)
require(igraph)
net = data.frame(
Node.1 = sample(LETTERS[1:15],15,replace = TRUE),Node.2 = sample(LETTERS[1:10],replace = TRUE))
g <- igraph::graph_from_data_frame(net,directed = FALSE )
plot(g)
g = delete.vertices(g,V(g)$name == "N")
plot(g)
,
您可以尝试使用以下代码使用 components
标记组并找到顶点数最多的组。然后使用 subset
过滤掉这些顶点并应用 delete.vertices
来移除它们。
delete.vertices(
g,subset(
V(g),with(components(g),membership == which.max(csize))
)
)
示例
g1 <- make_ring(5)
g2 <- make_ring(3)
g3 <- make_ring(7)
g4 <- make_ring(4)
g <- disjoint_union(g1,g2,g3,g4)
plot(g)
运行后
g.out <- delete.vertices(
g,membership == which.max(csize))
)
)
plot(g.out)
你会看到
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。