เริ่มต้นใช้งานเริ่มต้นใช้งานได้ฟรี

แสดงภาพ clique ที่ใหญ่ที่สุด

ในการแสดงภาพเครือข่าย มักจำเป็นต้องตัดส่วนหนึ่งของเครือข่ายออกมาเพื่อตรวจสอบความเชื่อมต่อระหว่างจุดยอดที่สนใจ ในแบบฝึกหัดนี้ คุณจะสร้างภาพแสดง clique ที่ใหญ่ที่สุดในเครือข่าย Forrest Gump จากแบบฝึกหัดก่อนหน้า พบว่ามี clique ขนาด 9 อยู่สอง clique คุณจะนำมาแสดงเคียงข้างกันโดยสร้างออบเจกต์ igraph ใหม่สองชิ้นจากการตัดแต่ละ clique ออกจากเครือข่ายหลัก ฟังก์ชัน subgraph() ช่วยให้เลือกได้ว่าจะเก็บจุดยอดใดไว้ในออบเจกต์เครือข่ายใหม่

แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร

การวิเคราะห์เครือข่ายใน R

ดูคอร์ส

คำแนะนำการฝึกหัด

  • กำหนดรายการ clique ที่ใหญ่ที่สุดในเครือข่ายให้กับออบเจกต์ lc
  • สร้าง subgraph แบบไม่มีทิศทางสองชิ้นโดยใช้ฟังก์ชัน subgraph() โดย gs1 ให้มีเฉพาะจุดยอดใน clique ที่ใหญ่ที่สุดอันแรก และ gs2 ให้มีเฉพาะจุดยอดใน clique ที่ใหญ่ที่สุดอันที่สอง ฟังก์ชันนี้จะถูกครอบด้วย as.undirected() เพื่อให้แน่ใจว่า subgraph ไม่มีทิศทางเช่นกัน
  • แสดงภาพ clique ที่ใหญ่ที่สุดทั้งสองเคียงข้างกันด้วย plot() โดยรันโค้ด par(mfrow=c(1,2)) ก่อน เพื่อให้ภาพทั้งสองแสดงเคียงกัน และตั้งค่า layout เป็น layout.circle() เพื่อให้มองภาพได้ชัดเจนขึ้น

แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ

ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์

library(igraph)

# Assign largest cliques output to object 'lc'
lc <- ___(g)

# Create two new undirected subgraphs, each containing only the vertices of each largest clique.
gs1 <- as.undirected(___(g, ___[[1]]))
gs2 <- as.undirected(___(g, ___[[2]]))


# Plot the two largest cliques side-by-side

par(mfrow=c(1,2)) # To plot two plots side-by-side

___(gs1,
     vertex.label.color = "black", 
     vertex.label.cex = 0.9,
     vertex.size = 0,
     edge.color = 'gray28',
     main = "Largest Clique 1",
     layout = ___(gs1)
)

___(gs2,
     vertex.label.color = "black", 
     vertex.label.cex = 0.9,
     vertex.size = 0,
     edge.color = 'gray28',
     main = "Largest Clique 2",
     layout = ___(gs2)
)
แก้ไขและรันโค้ด