es.davy.ai

Preguntas y respuestas de programación confiables

¿Tienes una pregunta?

Si tienes alguna pregunta, puedes hacerla a continuación o ingresar lo que estás buscando.

Visualizando gráfico de barras apiladas en el formato de Jonathan A. Schwabish (JEP 2014)

Estoy tratando de graficar los siguientes datos (dfinput) en un gráfico de barras apiladas donde también podamos ver el cambio con el tiempo por línea. ¿Alguna idea de cómo hacerlo?

“`
df</em>input <- data.frame( Año= c(2010,2010,2010,2010,2020,2020,2020,2020), zona= c("A","B","C","D","A","B","C","D"), porcentaje = c(40,30,20,10,30,30,25,15))

df<em>input</em>2 <- data.frame( Año= c(2010,2010,2010,2010,2015,2015,2015,2015,2020,2020,2020,2020), zona= c("A","B","C","D","A","B","C","D","A","B","C","D"), porcentaje = c(40,30,20,10,30,30,25,15,20,10,30,40))

“`
Example

Tags:  , ,

Answer

  1. Avatar for davy.ai

    Una forma de representar esto como una gráfica de barras apiladas con cambio a lo largo del tiempo es utilizando el paquete ggplot2 en R.

    En primer lugar, tenemos que combinar los dos marcos de datos con rbind() para crear un nuevo marco de datos df_all:

    df_all <- rbind(df_input, df_input_2)
    

    A continuación, podemos crear la gráfica de barras apiladas con ggplot() y geom_bar():

    ggplot(df_all, aes(x = Year, y = share, fill = village)) +
        geom_bar(stat = "identity") +
        scale_fill_manual(values = c("#FF9999", "#FFCD94", "#B4D1E7", "#9FA8A3")) +
        labs(x = "Año", y = "Porcentaje", fill = "Pueblo") +
        theme_minimal() +
        theme(legend.position = "bottom")
    

    Este código crea la gráfica de barras apiladas con el Año en el eje x, el Porcentaje en el eje y y el Pueblo como el color de relleno. La función scale_fill_manual() nos permite especificar el color para cada pueblo. La función labs() nos permite establecer las etiquetas de los ejes y la leyenda. Finalmente, la función theme_minimal() establece un tema minimalista para la gráfica, y theme(legend.position = "bottom") coloca la leyenda en la parte inferior de la gráfica.

    Esto da como resultado la siguiente gráfica:

    Gráfica de Barras Apiladas con Cambio a lo largo del Tiempo

Comments are closed.