Skip to main content
se añadieron 457 caracteres en el cuerpo
Origen Enlace
Patricio Moracho
  • 61.1k
  • 12
  • 42
  • 72

Veamos que opciones tenemos para configurar los ejes en ggplot. En primer lugar generamos un gráfico similar a tu ejemplo:

library(ggplot2)
set.seed(100)
mytitle2 <- "Contenido = 1.0"
global_data <- data.frame(Fase = runif(1000, min=0, max=3), 
                          Intensidad = runif(1000, min=0, max=3), 
                          Interaccion=sample(1:5, 1000, replace = TRUE))
a <-subset(global_data,Intensidad > 2 & Fase > 2)
ggplot(a, aes(fase)) +
    labs(title=mytitle2) +
    xlab("fase") +
    ylab("intensidad") +
    geom_point(position=position_jitter(width=.2,height=.1), aes(x=Fase, y=Intensidad, color=Interaccion)) + 
    scale_colour_gradient(low="red", high="blue") +
    scale_y_continuous(limits = c(0, 3))

En este ejemplo hemos recortada la muestra del eje x e y a los valores más cercanos a 3, si vemos el gráfico:

introducir la descripción de la imagen aquíintroducir la descripción de la imagen aquí

Vemos que el eje x se auto ajustó a la muestra, si no queremos que ocurra esto, hay que repetir lo que has hecho para el eje y, es decir:

+ scale_x_continuous(limits = c(0, 3))

o bien para los dos ejes también podemos usar:

 + xlim(0, 3)
 + ylim(0, 3)

Por otro lado, lo que mencionas de las etiquetas de los ejes puedes resolverlo configurando axis.title.y y axis.title.x de theme(), hay que definir un element_text y configurar los margin definiendo las propiedades top, rigth, bottom y left.

+ theme(axis.title.y = element_text(margin = margin(t = 0, r = 30, b = 0, l = 0)),
      axis.title.x = element_text(margin = margin(t = 30, r = 0, b = 0, l = 0)))

Para el título de la leyenda de los indicadores de color no he encontrado ninguna opción en la configuración del tema, pero siempre puedes configurara manualmente el título y agregarle un salto de línea, por ejemplo:

scale_colour_gradient(name="Title\n", low="red", high="blue") +

El resultado final sería algo así:

introducir la descripción de la imagen aquí

Veamos que opciones tenemos para configurar los ejes en ggplot. En primer lugar generamos un gráfico similar a tu ejemplo:

set.seed(100)
global_data <- data.frame(Fase = runif(1000, min=0, max=3), 
                          Intensidad = runif(1000, min=0, max=3), 
                          Interaccion=sample(1:5, 1000, replace = TRUE))
a <-subset(global_data,Intensidad > 2 & Fase > 2)
ggplot(a, aes(fase)) +
    labs(title=mytitle2) +
    xlab("fase") +
    ylab("intensidad") +
    geom_point(position=position_jitter(width=.2,height=.1), aes(x=Fase, y=Intensidad, color=Interaccion)) + 
    scale_colour_gradient(low="red", high="blue") +
    scale_y_continuous(limits = c(0, 3))

En este ejemplo hemos recortada la muestra del eje x e y a los valores más cercanos a 3, si vemos el gráfico:

introducir la descripción de la imagen aquí

Vemos que el eje x se auto ajustó a la muestra, si no queremos que ocurra esto, hay que repetir lo que has hecho para el eje y, es decir:

+ scale_x_continuous(limits = c(0, 3))

o bien para los dos ejes también podemos usar:

 + xlim(0, 3)
 + ylim(0, 3)

Por otro lado, lo que mencionas de las etiquetas de los ejes puedes resolverlo configurando axis.title.y y axis.title.x de theme(), hay que definir un element_text y configurar los margin definiendo las propiedades top, rigth, bottom y left.

+ theme(axis.title.y = element_text(margin = margin(t = 0, r = 30, b = 0, l = 0)),
      axis.title.x = element_text(margin = margin(t = 30, r = 0, b = 0, l = 0)))

El resultado final:

Veamos que opciones tenemos para configurar los ejes en ggplot. En primer lugar generamos un gráfico similar a tu ejemplo:

library(ggplot2)
set.seed(100)
mytitle2 <- "Contenido = 1.0"
global_data <- data.frame(Fase = runif(1000, min=0, max=3), 
                          Intensidad = runif(1000, min=0, max=3), 
                          Interaccion=sample(1:5, 1000, replace = TRUE))
a <-subset(global_data,Intensidad > 2 & Fase > 2)
ggplot(a, aes(fase)) +
    labs(title=mytitle2) +
    xlab("fase") +
    ylab("intensidad") +
    geom_point(position=position_jitter(width=.2,height=.1), aes(x=Fase, y=Intensidad, color=Interaccion)) + 
    scale_colour_gradient(low="red", high="blue") +
    scale_y_continuous(limits = c(0, 3))

En este ejemplo hemos recortada la muestra del eje x e y a los valores más cercanos a 3, si vemos el gráfico:

introducir la descripción de la imagen aquí

Vemos que el eje x se auto ajustó a la muestra, si no queremos que ocurra esto, hay que repetir lo que has hecho para el eje y, es decir:

+ scale_x_continuous(limits = c(0, 3))

o bien para los dos ejes también podemos usar:

 + xlim(0, 3)
 + ylim(0, 3)

Por otro lado, lo que mencionas de las etiquetas de los ejes puedes resolverlo configurando axis.title.y y axis.title.x de theme(), hay que definir un element_text y configurar los margin definiendo las propiedades top, rigth, bottom y left.

+ theme(axis.title.y = element_text(margin = margin(t = 0, r = 30, b = 0, l = 0)),
      axis.title.x = element_text(margin = margin(t = 30, r = 0, b = 0, l = 0)))

Para el título de la leyenda de los indicadores de color no he encontrado ninguna opción en la configuración del tema, pero siempre puedes configurara manualmente el título y agregarle un salto de línea, por ejemplo:

scale_colour_gradient(name="Title\n", low="red", high="blue") +

El resultado final sería algo así:

introducir la descripción de la imagen aquí

Origen Enlace
Patricio Moracho
  • 61.1k
  • 12
  • 42
  • 72

Veamos que opciones tenemos para configurar los ejes en ggplot. En primer lugar generamos un gráfico similar a tu ejemplo:

set.seed(100)
global_data <- data.frame(Fase = runif(1000, min=0, max=3), 
                          Intensidad = runif(1000, min=0, max=3), 
                          Interaccion=sample(1:5, 1000, replace = TRUE))
a <-subset(global_data,Intensidad > 2 & Fase > 2)
ggplot(a, aes(fase)) +
    labs(title=mytitle2) +
    xlab("fase") +
    ylab("intensidad") +
    geom_point(position=position_jitter(width=.2,height=.1), aes(x=Fase, y=Intensidad, color=Interaccion)) + 
    scale_colour_gradient(low="red", high="blue") +
    scale_y_continuous(limits = c(0, 3))

En este ejemplo hemos recortada la muestra del eje x e y a los valores más cercanos a 3, si vemos el gráfico:

introducir la descripción de la imagen aquí

Vemos que el eje x se auto ajustó a la muestra, si no queremos que ocurra esto, hay que repetir lo que has hecho para el eje y, es decir:

+ scale_x_continuous(limits = c(0, 3))

o bien para los dos ejes también podemos usar:

 + xlim(0, 3)
 + ylim(0, 3)

Por otro lado, lo que mencionas de las etiquetas de los ejes puedes resolverlo configurando axis.title.y y axis.title.x de theme(), hay que definir un element_text y configurar los margin definiendo las propiedades top, rigth, bottom y left.

+ theme(axis.title.y = element_text(margin = margin(t = 0, r = 30, b = 0, l = 0)),
      axis.title.x = element_text(margin = margin(t = 30, r = 0, b = 0, l = 0)))

El resultado final: