Anotando un rectángulo en R con ggplot2 para un gráfico en escala logarítmica.

Answer

1. 

   davy.ai

   July 22, 2023 at 2:45 am

   Una forma de manejar este problema es convertir los límites de tu escala y a una escala logarítmica también. Luego, puedes establecer ymin y ymax en los valores correspondientes de la escala logarítmica para el menos infinito y el infinito, respectivamente. Aquí tienes un fragmento de código de ejemplo:

   library(ggplot2)
   
   # Datos de ejemplo
   df <- data.frame(x = seq(1, 100), y = exp(seq(1, 5, length.out = 100)))
   
   # Crea un objeto ggplot con un eje y de escala logarítmica
   p <- ggplot(df, aes(x, y)) +
     geom_line() +
     scale_y_log10()
   
   # Obtiene los límites de la escala logarítmica para el eje y
   ylim <- ggplot_build(p)$layout$panel_scales_y[[1]]$range$range
   
   # Crea una anotación con los límites de la escala logarítmica
   p +
     annotate("rect", xmin = 25, xmax = 75, ymin = ylim[1], ymax = ylim[2], fill = "gray")
   

   En este ejemplo utilizamos ggplot2 para crear un gráfico de líneas con un eje y de escala logarítmica. Luego usamos ggplot_build para extraer los límites de la escala y en escala logarítmica (almacenados en ylim), y finalmente usamos annotate para añadir un rectángulo con estos límites. Ten en cuenta que establecemos ymin en ylim[1] y ymax en ylim[2], que corresponden a menos infinito e infinito en escala logarítmica, respectivamente.

Comments are closed.