En este artículo, vamos a ver cómo mover las etiquetas de los ejes usando el gráfico de barras ggplot2 en el lenguaje de programación R.
Primero, debe instalar el paquete ggplot2 si no se instaló previamente en R Studio. Para crear un diagrama de barras simple, usaremos la función geom_bar() .
Sintaxis:
geom_bar(estadísticas, relleno, color, ancho)
Parámetros:
- stat : Configure el parámetro stat para identificar el modo.
- relleno: representa el color dentro de las barras.
- color : Representa el color de los contornos de las barras.
- ancho: Representa el ancho de las barras.
Datos en uso:
Veamos cómo se verá la trama predeterminada sin ninguna modificación.
R
library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2","M-3","M-4"), runs=c(67,37,74,10)) head(ODI) # Default axis labels in ggplot2 bar plot perf <-ggplot(data=ODI, aes(x=match, y=runs,fill=match))+ geom_bar(stat="identity") perf
Producción:
De forma predeterminada, R agrega los nombres de los vectores que se asignan en el Marco de datos como el título del eje. Para agregar manualmente el título del eje, use los siguientes comandos:
// Para modificar la etiqueta del eje x
xlab(“X_axis_NombreEtiqueta”)
// Para modificar la etiqueta del eje y
ylab(“Eje_Y_NombreEtiqueta”)
// Modifica simultáneamente el título de los ejes x e y
labs(x=”X_axis_Labelname”,y=”Y_axis_Labelname”)
Ejemplo:
R
library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2","M-3","M-4"), runs=c(67,37,74,10)) head(ODI) # Default axis labels in ggplot2 bar plot perf <-ggplot(data=ODI, aes(x=match, y=runs,fill=match))+ geom_bar(stat="identity") perf # Manually adding axis labels ggp <- perf+labs(x="Matches",y="Runs Scored") ggp
Producción:
Para realizar cualquier modificación en las etiquetas de los ejes usamos la función element_text(). Los argumentos de esta función son:
- Color
- Tamaño
- Cara
- Familia
- altura de la línea
- hjust y vjust
El argumento hjust (Ajuste horizontal) o vjust (Ajuste vertical) se utiliza para mover las etiquetas de los ejes. Toman números en el rango [0,1] donde:
// Representa la esquina más a la izquierda del eje
hjusto = 0
// Representa la mitad del eje
hjusto = 0.5
// Representa la esquina más a la derecha del eje
hjusto = 1
Primero creemos una gráfica con etiquetas de eje hacia la izquierda.
Ejemplo:
R
library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2","M-3","M-4"), runs=c(67,37,74,10)) head(ODI) # Default axis labels in ggplot2 bar plot perf <-ggplot(data=ODI, aes(x=match, y=runs,fill=match))+ geom_bar(stat="identity") perf # Manually adding axis labels ggp <- perf+labs(x="Matches",y="Runs Scored") ggp # Moving axis label to left ggp + theme( axis.title.x = element_text(hjust=0), axis.title.y = element_text(hjust=0) )
Producción:
Ahora vamos a moverlos al centro.
Ejemplo:
R
library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2","M-3","M-4"), runs=c(67,37,74,10)) head(ODI) # Default axis labels in ggplot2 bar plot perf <-ggplot(data=ODI, aes(x=match, y=runs,fill=match))+ geom_bar(stat="identity") perf # Manually adding axis labels ggp <- perf+labs(x="Matches",y="Runs Scored") ggp # Moving axis label in middle ggp + theme( axis.title.x = element_text(hjust=0.5), axis.title.y = element_text(hjust=0.5) )
Producción:
Se puede hacer algo similar para moverlos hacia la derecha.
Ejemplo:
R
library(ggplot2) # Inserting data ODI <- data.frame(match=c("M-1","M-2","M-3","M-4"), runs=c(67,37,74,10)) head(ODI) # Default axis labels in ggplot2 bar plot perf <-ggplot(data=ODI, aes(x=match, y=runs,fill=match))+ geom_bar(stat="identity") perf # Manually adding axis labels ggp <- perf+labs(x="Matches",y="Runs Scored") ggp # Moving axis label to right ggp + theme( axis.title.x = element_text(hjust=1), axis.title.y = element_text(hjust=1) )
Producción:
Publicación traducida automáticamente
Artículo escrito por rishabhchakrabortygfg y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA