R'de igraph kullanılarak aynı vertiğe bağlı bir grafiğin tüm köşe noktalarının bir alt kümesi nasıl çizilir?

Question

Sadece bitişik düğümler (komşular dahil) değil, aynı zamanda herhangi bir olası yolu olanlar da dahil olmak üzere ağ 'g' köşesine # 18 bağlanan tüm köşelerin alt kümesini bulmak ve çizmek istiyorum

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

# 18 vertex bir yol olan tüm köşeleri bulduktan sonra, ortaya çıkan alt grafiği aşağıdaki gibi görünmelidir:

Herhangi bir fikir? Teşekkürler! bu soruyu cevapsız bırakmak değil

Answer 1

... isterseniz

Sen düğümü 18. induced_subgraph düğümleri yeniden numaralandırır olmasıdır biraz zor olan tek şey ihtiva bağlı bileşenin oluşan subgraph istiyorum, bu yüzden Orijinal numaralandırmayı koruyun, alt satırdaki etiketleri açıkça ayarlamanız gerekir.

## 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)