在图形中取消命名顶点-R

时间:2018-11-07 00:39:14

标签: r igraph

我有以下无向星形图:

> g2
IGRAPH 722b7c9 DN-- 5 8 -- 
+ attr: name (v/c)
+ edges from 722b7c9 (vertex names):
[1] V1->V2 V1->V3 V1->V4 V1->V5 V2->V1 V3->V1 V4->V1 V5->V1

我想变成哪个:

[1] 1->2 1->3 1->4 1->5 2->1 3->1 4->1 5->1 

我尝试将as_edgelistnames = FALSE结合使用以消除名称。

unnameGraph <- function(graphToPlot){

  edgeListG2 <- as_edgelist(graphToPlot, names = FALSE)

  return(make_graph(edgeListG2))

}

但是它给了我错误的边缘列表并破坏了星形图:

[1] 1->1 1->1 2->3 4->5 2->3 4->5 1->1 1->1

为什么?

1 个答案:

答案 0 :(得分:0)

el <- matrix(as.integer(gsub(pattern="V", "",x=as_edgelist(g2))), nc = 2, byrow = FALSE)
g3 <- graph_from_edgelist(el)
g3
plot(g3)

enter image description here