केंद्रीय वर्टिस को विज़ुअलाइज़ करें
जैसा कि हमने पिछले लेसन में देखा, स्टेशन 275 का out/in डिग्री अनुपात सबसे कम था। इसे विज़ुअलाइज़ करने के लिए हम make_ego_graph() का उपयोग कर सकते हैं और इस स्टेशन से निकलने वाले सभी आउटबाउंड पाथ देख सकते हैं। यह भौगोलिक कोऑर्डिनेट लेआउट पर प्लॉट करना भी उपयोगी है, न कि डिफॉल्ट igraph लेआउट पर। डिफॉल्ट रूप से, igraph आपका ग्राफ़ दिखाने के लिए layout_nicely() फंक्शन इस्तेमाल करता है, जो सर्वश्रेष्ठ लेआउट के बारे में एल्गोरिदमिक अनुमान लगाता है। हालाँकि, इस केस में हम प्रत्येक स्टेशन के कोऑर्डिनेट्स निर्दिष्ट करना चाहते हैं, क्योंकि जब कोई वर्टेक्स दूसरे के ऊपर होता है तो उसका मतलब होता है कि वह वास्तव में उसके उत्तर में है.
यह अभ्यास पाठ्यक्रम का हिस्सा है
केस स्टडीज़: R में नेटवर्क विश्लेषण
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
# Make an ego graph of the least traveled graph
g275 <- make_ego_graph(___, 1, nodes = "___", mode= "out")[[1]]
# Plot ego graph
plot(
g275,
# Weight the edges by weight attribute
edge.width = E(g275)$weight
)