Ejemplo de gráfico de quesitos en R

por | Jun 10, 2018 | R | 2 Comentarios

Gráfico de quesitos

Muestra un ejemplo simple en R de un gráfico de quesitos, para ellos se utiliza la librería ggplot2.

# Cargar la librerías
library(ggplot2)
library(scales)

category <- c("A","B","C") 
value <- c(20,40,60)

df <- data.frame(value, category)

df$porcent = percent(df$value / sum(df$value))

df[['category']] = factor(df[['category']], levels = na.omit(as.character(df[['category']])))
df[['fraction']] = df[['value']]/sum(df[['value']]) 
df[['pos']] = 1 - (cumsum(df[['fraction']]) - df[['fraction']]/2)
ggplot(df, aes(x = 1, y = fraction, fill=category, label = fraction)) +
  geom_col(width = 1) + 
  coord_polar(theta='y') +
  theme_minimal() + 
  scale_y_continuous(
    breaks=df$pos,
    labels=df$porcent
  ) +
  theme(axis.line.y = element_blank(),
        axis.title.y = element_blank(),
        axis.ticks.y = element_blank(),
        axis.text.y = element_blank())

Gráfico de quesitos ggplot2 R

Gracias a la colaboración de Miguelito

2 Comentarios

  1. Rafael Barragán

    Gracias por la aportación, estoy aprendiendo R y preparando unas gráficas para un trabajo y este ejemplo me ha sido de mucha utilidad para generar figuras de este tipo. Saludos y felicitaciones.

    Responder
  2. Augusto R.

    Muchas graficas, buen aporte, aunque tengo una duda, para que sirve la siguiente sentencia: scale_y_continuous(breaks=df$pos)

    ¿porque se creo la variable pos ?

    Responder

Enviar un comentario

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