¿Cómo crear un histograma de dos variables en R?

En este artículo, discutiremos cómo crear un histograma de dos variables en el lenguaje de programación R.

Método 1: Crear un histograma de dos variables con base R

En este enfoque para crear un histograma de dos variables, el usuario necesita llamar a la función hist() dos veces ya que hay dos variables, y con la segunda función hist() el usuario necesita usar el argumento especial de esta función ‘ add’ con el que tanto el histograma con diferentes variables se trazarán en el gráfico único.

Sintaxis:

hist(x, col = NULL, add=true)

Parámetros:

• x: un vector de valores para los que se desea el histograma.
• col: un color que se utilizará para rellenar las barras
• add: para fusionar el histograma

Ejemplo:

En este ejemplo, crearemos el histograma usando la función hist() con variables con puntos de datos aleatorios de 500 entradas en la misma gráfica.

# Variable-1 with 500 random data points
gfg1<-rnorm(500,mean=0.5,sd=0.1) 
  
# Variable-2 with 500 random data points
gfg2<-rnorm(500,mean=0.7,sd=0.1)  
  
# histogram of variable-1
hist(gfg1,col='green')
  
# histogram of variable-2
hist(gfg2,col='red',add=TRUE)

Producción:

Método 2: crear un histograma de dos variables con el paquete ggplot2

En este método, para crear un histograma de dos variables, el usuario primero debe instalar e importar el paquete ggplot2 y luego llamar a geom_histrogram con los parámetros especificados según los requisitos y necesidades para crear el marco de datos con la variable que necesitamos. el histograma en el lenguaje de programación R.

Para instalar e importar el paquete ggplot2, el usuario debe usar la siguiente sintaxis:

Install - install.package('ggplot2')      
Import - library(ggplot2)                  

Ejemplo:

# load the package
library(ggplot2)
  
# create a dataframe
# with mean and standard deviation
gfg < - data.frame(toss=factor(rep(c("Head", "Tail"), each=500)),
                   coin=round(c(rnorm(500, mean=65, sd=5), 
                                rnorm(500, mean=35, sd=5))))
  
# plot the data using ggplot
ggplot(gfg, aes(x=coin, fill=toss, color=toss)) +
geom_histogram(position="identity")

Producción: