Adjacency matrices
ในแบบฝึกหัดนี้ คุณจะดึงและคำนวณ adjacency matrix อันดับหนึ่งและอันดับสองของเครือข่าย
ได้เห็นวิธีดึง adjacency matrix อันดับหนึ่งโดยใช้ฟังก์ชัน as_adjaceny_matrix() ในสไลด์แล้ว
สำหรับ adjacency matrix อันดับสอง ให้คูณเมทริกซ์อันดับหนึ่งกับตัวมันเอง แล้วแทนที่ค่าที่เป็นบวกทั้งหมดด้วย 1 เนื่องจากเราทำงานกับเครือข่ายแบบไม่มีน้ำหนักเท่านั้น นอกจากนี้ ต้องให้แน่ใจว่าองค์ประกอบบนแนวทแยงมีค่าเป็น 0 เพราะไม่อนุญาตให้มี self-edge
แบบฝึกหัดนี้เป็นส่วนหนึ่งของหลักสูตร
การวิเคราะห์เชิงพยากรณ์โดยใช้ข้อมูลเครือข่ายใน R
คำแนะนำการฝึกหัด
- ดึง adjacency matrix ของเครือข่ายโดยใช้ฟังก์ชัน
as_adjacency_matrix()แล้วตั้งชื่อเมทริกซ์ว่าAdjacencyMatrix - คำนวณ adjacency matrix อันดับสองโดยคูณ
AdjacencyMatrixกับตัวมันเอง แล้วตั้งชื่อผลลัพธ์ว่าSecondOrderMatrix_adj - สร้างเมทริกซ์ใหม่ชื่อ
SecondOrderMatrixโดยกำหนดเงื่อนไขบนSecondOrderMatrix_adjเพื่อให้ค่าที่เป็นบวกทั้งหมดเท่ากับ 1 และองค์ประกอบบนแนวทแยงต้องเป็น 0 - ตรวจสอบ 10 แถวแรกและ 10 คอลัมน์แรกของ
SecondOrderMatrix
แบบฝึกหัดเชิงโต้ตอบแบบลงมือทำ
ลองทำแบบฝึกหัดนี้โดยเติมโค้ดตัวอย่างนี้ให้สมบูรณ์
# Extract the adjacency matrix
AdjacencyMatrix <- as_adjacency_matrix(___)
# Compute the second order matrix
SecondOrderMatrix_adj <- ___ %*% ___
# Adjust the second order matrix
SecondOrderMatrix <- ((___) > 0) + 0
diag(SecondOrderMatrix) <- 0
# Inspect the second order matrix
SecondOrderMatrix[___:___, ___:___]