TAREA 1

Alumnos: Alexander Noblejas y Fernanda Pizarro

# Cargar el paquete igraph
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

dG=read_graph("dG.gml", format = "gml")

summary(dG)

## IGRAPH d0bd556 D-W- 4 5 -- 
## + attr: id (v/n), label (v/c), sex (v/c), color (v/c), weight (e/n),
## | color (e/c), label (e/c)

plot(dG, edge.arrow.size=.4,vertex.label=V(dG)$label,edge.curved=.1)

## Ejercicio 1

ab=read_graph("C:/Users/LENOVO/OneDrive/Documentos/1.01/Gvis.gml", format = "gml")

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

plot(ab, edge.arrow.size=.4,vertex.label=V(ab)$label,edge.curved=.1, escale = TRUE)

plot(ab, edge.arrow.size=.4,vertex.label=V(ab)$label,edge.curved=.1)

```