Tengo un dataframe de energía que muestra la participación de diferentes fuentes de energía durante varios años: Year <- c(“2016″,”2016″,”2016″,”2017″,”2017″,”2017″,”2018″,”2018″,”2018”) Source <- c(“carbón”,”hidro”,”solar”,”carbón”,”hidro”,”solar”,”carbón”,”hidro”,”solar”) Share <- c(0.5,0.25,0.25,0.4,0.15,0.45,0.7,0.1,0.2) df <- cbind.data.frame(Year,Source,Share) Estoy intentando graficar el dataframe usando gráficos de sectores facetados para los diferentes años: ggplot(df, aes(x=1, y=Share, fill=Source)) + geom_bar(stat=”identity”, width=1, . . . Read more
He logrado crear un dataframe derretido que contiene como valores el % de las fuentes de energía (variable factor) para varios años, como factor adicional o Fecha: ¿Cómo podría crear gráficas de pastel facetadas para los diferentes años con ggplot (o plotrix)? Hasta ahora, he logrado hacer lo siguiente: ggplot(melted_df, . . . Read more
Estoy creando un gráfico facet_wrap en R, y estoy tratando de automatizar el labeller. Puedo crear una etiqueta personalizada manualmente, usando este código: library(ggplot2) library(tidyverse) df <- data.frame(a = rep(c(1/8,1/4,1/2), each = 100), b = rep(c(“A”, “B”, “C”, “D”), each = 25), x = rnorm(100)) names <- c( `0.125` = . . . Read more
facet_grid y facet_wrap tienen sus propias limitaciones. facet_wrap no tiene un argumento space = “free”, lo que resulta en gráficos con ejes y poco atractivos (ver https://stackoverflow.com/questions/70356131/add-space-argument-to-facet-wrap para el código). facet_grid se ve limitado por tener etiquetas en el lateral (ver https://stackoverflow.com/questions/70356131/add-space-argument-to-facet-wrap para el código). Se han dado soluciones para . . . Read more
facet_wrap() ha sido reconocido por no tener un argumento space = “free” (https://github.com/tidyverse/ggplot2/issues/2933). Esto puede causar problemas de espaciado en el eje y de los gráficos. Crea la figura anterior utilizando el siguiente código: library(tidyverse) p <- mtcars %>% rownames_to_column() %>% ggplot(aes(x = disp, y = rowname)) + geom_point() + . . . Read more