¿Cómo crear un diagrama de Venn en R?

Posted on by Rudeus Greyrat

El diagrama de Venn es la representación gráfica de conjuntos que se utiliza para mostrar la relación entre ellos. Mediante el uso del diagrama de Venn, se pueden resaltar las diferencias y las similitudes entre los elementos de los conjuntos. El diagrama de Venn también se conoce como diagrama lógico o diagrama de conjuntos. Usamos círculos para representar conjuntos que pueden intersecarse, superponerse o no intersecarse, según la relación entre ellos. Hay una serie de operaciones que podemos realizar usando el diagrama de Venn, pero las principales son: Unión, Intersección y Complemento.

  • Unión: Unión de conjuntos se refiere a los elementos combinados de todos los conjuntos.
  • Intersección: Intersección de conjuntos es el conjunto de elementos que contiene el elemento común de ambos conjuntos. Cuando no haya un elemento común, la intersección dará un valor nulo.
  • Complemento: El complemento de un conjunto es el conjunto de todos los elementos del conjunto universal distintos del conjunto mismo. El complemento de un conjunto vacío es el conjunto universal.

En este artículo, implementaremos el diagrama de Venn utilizando el lenguaje de programación R. 

Método 1: Uso del “Paquete VennDiagram R”

Necesitamos instalar y cargar el paquete primero:   

Sintaxis:

install.packages(“VennDiagram”)               

biblioteca («Diagrama de Venn»)                        

Para crear un diagrama de Venn para conjuntos de pares o conjuntos triples o para cualquier número de conjuntos, solo hay una ligera diferencia en la sintaxis. Por ejemplo, usamos la palabra clave «por pares» para crear un diagrama de Venn con dos conjuntos, y para tres conjuntos usamos la palabra clave » triple» . 

  • Para dos conjuntos:

Sintaxis:

    grilla.nuevapagina()                                        

    dibujar.por pares.venn(area1,area2,cruz.area,columna,llenar)

  • Para tres conjuntos:

Sintaxis:

    grilla.nuevapagina()                                        

    dibujar.triple.venn(área1,área2, área3,n12,n23,n13, n123,categoría)

Parámetros:

  • area1: El tamaño del primer conjunto
  • area2: El tamaño del segundo conjunto
  • area3: El tamaño del tercer set
  • cross.area: El tamaño de la intersección entre los conjuntos
  • n12: el tamaño de la intersección entre el primer y el segundo conjunto
  • n23: El tamaño de la intersección entre el tercer y segundo conjunto
  • n13: El tamaño de la intersección entre el primer y el tercer conjunto
  • n123: El tamaño de la intersección entre los tres conjuntos
  • col: Un vector que da los colores de la circunferencia del círculo.
  • relleno: un vector que da los colores al área del círculo
  • categoría: un vector de strings que proporciona los nombres de categoría de los conjuntos

Para crear un diagrama de Venn usando este paquete, instale y cargue el paquete en el editor. Agregue una nueva página de trazado usando grid.newpage(). Luego, inserte los datos para el diagrama de Venn usando la sintaxis anterior. Para un conjunto use draw.single, dos conjuntos use draw.pairwise, tres conjuntos use draw.triple, cuatro conjuntos use draw.quad y cinco conjuntos use quintuple. 

Ejemplo 1:

R

# load Venn diagram package
library("VennDiagram")
  
# move to new plotting page
grid.newpage()
  
# create pairwise Venn diagram
draw.pairwise.venn(area1=20, area2=45,cross.area=10,
                   category=c("Mango","Banana"),fill=c("Red","Yellow"))

 Producción:

Ejemplo 2:

R

# load Venn diagram package
library("VennDiagram")
  
# move to new plotting page
grid.newpage()
  
# create Venn diagram with three sets
draw.triple.venn(area1=40, area2=15, area3=10, 
                 n12=5, n23=12, n13=4, n123=2, 
                 category=c("Science","Economics","English"),
                 col="Red",fill=c("Green","Yellow","Blue"))

Producción:

Ejemplo 3:

R

# load Venn diagram package
library("VennDiagram")
  
# move to new plotting page
grid.newpage()
  
# create Venn diagram with four sets
draw.quad.venn(area1=72, area2=86, area3=50, 
               area4 =52, n12=44, n23=38, n13=27, 
               n14= 32,n24=32, n34=20, n123=18, 
               n124=17, n234=13, n134=11, n1234=6, 
               category=c("Cricket","Football","Badminton","Table Tennis"),
               col="Green",fill=c("Red","Pink","Blue","Orange"),lty="dashed")

Producción:

Método 2: Usar el paquete R «GGVENN»

Primero, necesitamos instalar este paquete y cargarlo para que sea utilizable.

instalar.paquetes («ggvenn»)              

biblioteca («ggvenn»)                       

ggvenn traza el diagrama de Venn como una función independiente. Admite tanto el marco de datos como la lista como entrada.

Sintaxis:

ggvenn (datos, mostrar_elementos, mostrar_porcentaje, relleno_color, trazo_color, trazo_tipo de línea)

Parámetros:

  • datos: un marco de datos o una lista como datos de entrada
  • show_elements: muestra elementos establecidos en lugar de contar
  • show_percentage: Mostrar porcentaje para cada conjunto
  • fill_color: colores de relleno en círculos
  • stroke_color: color de trazo para dibujar círculos
  • stroke_linetype: tipo de línea para dibujar círculos

Este enfoque es simple y solo se deben pasar los datos que se van a trazar.

Ejemplo 1:

R

# load ggvenn package
library("ggvenn")
  
# use list as input
A <-list('India'=c(1,3,5,7),'USA'=c(1,6,5))
  
# create venn diagram and display all the sets
ggvenn(A)

Producción:

Ejemplo 2:

R

# load ggvenn package
library("ggvenn")
  
# use data frame as input
M <-tibble(value=c(1,3,2,7,5),'TEA'=c(TRUE,FALSE,TRUE,FALSE,FALSE),
           'COFFEE'=c(TRUE,TRUE,FALSE,FALSE,TRUE),  
           'JUICE'=c(TRUE,FALSE,FALSE,TRUE,TRUE))
  
# create Venn diagram and display all sets
ggvenn(M)

Producción: 

Ejemplo 3:

R

# load ggvenn package
library("ggvenn")
  
# use list as input
D <-list('Autumn'=c(2,3,1),'Winter'=c(4,7,9,1),
         'Summer'=c(3,7,2,5),'Spring'=c(2,5,9,1))
  
# creating venn diagram for four sets
# and displaying only two sets
ggvenn(D,c("Autumn","Spring"),show_percentage=FALSE,
       fill_color=c("red","orange"))

Producción:

Ejemplo 4:

R

# load ggvenn package
library("ggvenn")
  
# use list as input 
H <-list('Bus'=c(6,7,3),'Truck'=c(4,3,9),
         'Cycle'=c(10,3,2,8),'Car'=c(7,5,4,3))
  
# create customised venn diagram
ggvenn(H,show_elements=TRUE,stroke_color="Red",
       stroke_linetype="solid")

 Producción:

Método 3: Usar el paquete R «GPLOTS»

El paquete gplots proporciona diagramas de Venn para hasta cinco conjuntos. La función venn() acepta una lista de conjuntos como argumento o toma una array binaria, una columna por conjunto, que indica para cada elemento, uno por fila, la pertenencia a cada conjunto. La página principal de venn( ) enumera las opciones para cambiar la apariencia de los gráficos, por ejemplo, se pueden omitir los nombres de los conjuntos y cambiar los tamaños. Sin embargo, existe una amplia oportunidad para ampliar la funcionalidad de este paquete. 

Como de costumbre, el primer paso es instalar y cargar el paquete:

install.packages(“gplots”)                    

biblioteca («gplots»)                             

Simplemente pasamos la entrada como un parámetro en la función venn() .

Ejemplo 1:

R

# load gplots package
library("gplots")
  
# use list as input
x <-list('Plants'=c(6,7,8),'Animals'=c(7,8,3,4))
  
# create Venn diagram with two sets
venn(x)

Producción:

Ejemplo 2:

R

# load gplots package
library("gplots")
  
# creating venn diagram by passing 
# list as direct parameter
venn(list(YouTube=1:6,Netflix=3:8,Instagram=c(5,8:12)))

Producción:

Método 4: Uso del paquete R «GGVENNDIAGRAM»

‘ggVennDiagram’ devuelve datos estructurados que se pueden usar para trazar Venn. El primer paso para hacer uso de este paquete es instalarlo y cargarlo.

install.packages(“ggVennDiagram”)                                   

biblioteca («ggVennDiagram»)                                   

Aquí también simplemente pasaremos el parámetro en la función ggVennDiagram() .

Sintaxis:

ggVennDiagram(datos, etiqueta_alfa, categoría.nombres, mostrar_intersección, establecer_color)

Parámetros:

  • data: Entrada en forma de lista
  • label_alpha: elimina el fondo de las etiquetas de región
  • category.names: Da nombres a los conjuntos.
  • show_intersect: si es verdadero, el texto se puede visualizar
  • set_color: color de las etiquetas del conjunto

Para que esto funcione, primero instale y cargue el paquete ggVennDiagram y proporcione la entrada como lista. Luego, use la sintaxis anterior para crear el diagrama de Venn y para personalizar el diagrama de Venn use otros parámetros.

Ejemplo 1:

R

# load ggVennDiagram Package
library("ggVennDiagram")
  
# use list as an input
x <-list('C++'=c(9,3,5,2),'Java'=c(7,8,4,3),
         'Python'=c(11,2,4,5,8),'Ruby'=c(3,8))
  
# creating Venn diagram and displaying 
# all sets
ggVennDiagram(x)

Producción:

Ejemplo 2:

R

# load ggVennDiagram Package
library("ggVennDiagram")
  
# use list as input
M <-list('Rose'=c(2,6),'Lily'=c(5,3,9,2),
         'Sunflower'=c(3,10,2),'Lotus'=c(5,7,8))
  
# creating Venn diagram with four sets
# but displaying only first two
ggVennDiagram(M[1:2],set_color="Red",label_alpha=0,
              show_intersect=FALSE)

Producción:

Ejemplo 3:

R

# load ggVennDiagram Package
library("ggVennDiagram")
  
# use list as input
D<-list(A=c(5,6,8),B=c(1,9,8,2),C=c(8,9,4,7,11))
  
# creating Venn diagram with three sets
# but displaying only last two
ggVennDiagram(D[2:3],category.names=c("BREAKFAST","LUNCH"))

Producción:

Publicación traducida automáticamente

Artículo escrito por shakyatripti1308 y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *