如何繪製R中使用igraph鏈接到同一頂點的圖的所有頂點的子集？

Question

我想找到並繪製連接到網絡'g'中的頂點＃18的所有頂點的子集，不僅包括相鄰節點（鄰居），還包括那些有任何可能路徑的頂點

g <- (make_full_graph(10) + make_full_graph(10)) 
plot(g) #plots 2 separate networks: 

找到所有有路到頂點＃18的頂點後，所產生的子圖應該是這樣的：

任何想法？謝謝！

Answer 1

不離開回答此問題......

你想由一個包含節點18.稍微棘手的是，induced_subgraph重新編號的節點唯一連接組件的子圖，所以，如果你想保留原始編號，您需要明確設置子圖上的標籤。

## Your sample graph 
g <- (make_full_graph(10) + make_full_graph(10)) 
plot(g) 

## Get Connected component for node 18 
Comp = components(g) 
Comp18 = which(Comp$membership == Comp$membership[18]) 

## Extract subgraph and name nodes based on old numbering 
g2 = induced_subgraph(g, Comp18) 
g2 = set_vertex_attr(g2, "label", value = Comp18) 
plot(g2)