Tarea 3 - Monzon Hadaly

rm(list = ls()) # clear memory
library(igraph)

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

## 
## Attaching package: 'igraph'

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

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

MG=read.graph("EliteNet.gml", format = "gml")

## Warning: `read.graph()` was deprecated in igraph 2.0.0.
## ℹ Please use `read_graph()` instead.
## This warning is displayed once every 8 hours.
## Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
## generated.

## Warning in read.graph.gml(file, ...): At vendor/cigraph/src/io/gml.c:149 : One
## or more unknown entities will be returned verbatim (ñ).

summary(MG)

## IGRAPH 334b753 U-W- 37 135 -- 
## + attr: id (v/n), label (v/c), multi (v/n), color (v/c), weight (e/n)

plot(MG, vertex.color = V(MG)$color, vertex.label = V(MG)$label,edge.curved=.1, main = "Network Elites")