Analiyzing Network from Macaque Data Set

library(igraph)

## Warning: package 'igraph' was built under R version 4.2.3

## 
## Attaching package: 'igraph'

## The following objects are masked from 'package:stats':
## 
##     decompose, spectrum

## The following object is masked from 'package:base':
## 
##     union

library(igraphdata)

## Warning: package 'igraphdata' was built under R version 4.2.3

data("macaque")
LM <- graph.laplacian(macaque)

Untuk mengkomputasikan runag kosong dari matrix Laplacian, kita harus membuat format matrix numerikal dalam format

LM <- as.numeric(LM)
LLM <- matrix(LM, 50, 50)

## Warning in matrix(LM, 50, 50): data length [2025] is not a sub-multiple or
## multiple of the number of rows [50]

Komputasikan matrix Laplacian yang di normalisasikan dari grafis yang tidak terarahkan untuk dataset macaque.

LM2 <- graph.laplacian(macaque, normalized = TRUE)

LM2 <- as.numeric(LM2)
LLM2 <- matrix(LM2, 50, 50)

## Warning in matrix(LM2, 50, 50): data length [2025] is not a sub-multiple or
## multiple of the number of rows [50]

Komputasikan nilai eigen menggunakan fungsi eigen().

EE <- eigen(LLM2)

dan dari perhitungan akan di peroleh hasil sebagai berikut :

sum(EE$values)

## [1] -0.6769231+0i