Ejemplo de gráfico de barras múltiples en R

Gráfico de barras horizontales múltiples valores por barra

library(ggplot2) # Cargar la librería gráfica "ggplot2"

nombre <- c("A","B","C","A","B","C")
tipo <- c(rep("yes",3),rep("no",3))
valor <- c(1,3,2,3,2,4)

datos <- data.frame(nombre=nombre,tipo=tipo, valor=valor)

ggplot() + 
 geom_bar(data=datos,aes(x=nombre, y=valor,fill=tipo), stat='identity', position='dodge') +
 coord_flip()

barras horizontales con múltiples valores por barra

 

Gráfico de comparación de múltiples valores discretizados por una variable

library(ggplot2) # Cargar la librería gráfica "ggplot2"
library(dplyr) # Cargar la librería de manipulación de dataframes "dplyr"

sexo <- c(rep("man",20),rep("woman",20),rep("man",20),rep("woman",20))
valor <- 1:80
grupo <- c(rep("spain",25),rep("italy",25),rep("portugal",30))

datos <- data.frame(sexo=sexo, valor=valor, grupo=grupo)

datos <- datos %>%
 group_by(grupo, sexo) %>%
 summarise(valor = sum(valor, na.rm = TRUE)) %>%
 ungroup() %>%
 mutate(grupo = factor(grupo, levels = .$grupo))

ggplot(datos, aes(grupo, valor, fill = sexo)) +
 geom_bar(stat = "identity", position = "dodge") +
 coord_flip()

Gráfico de comparación de múltiples valores discretizados por una variable

Gráfico de puntos categorizados por tipo

library(ggplot2) # Cargar la librería gráfica "ggplot2"

nombre <- c("A","B","C","D","E","F","G","H","I","J")
valor <- c(8,4,3,2,5,6,7,1,9,10)
tipo <- c(rep("yes",5),rep("no",5))
datos <- data.frame(nombre=nombre,tipo=tipo, valor=valor)

datos <- datos[order(datos$valor),] 
datos$tipo <- factor(datos$tipo) # it must be a factor
datos$color[datos$tipo=="yes"] <- "blue"
datos$color[datos$tipo=="no"] <- "red"
dotchart(datos$valor,labels=datos$nombre,cex=.8, groups= datos$tipo,
 main="Titulo del grafico", xlab="Valores", color=datos$color)

Gráfico de puntos categorizados por tipo

Autor: Diego Calvo