studio - superponer graficas en r

En la gráfica de la base R, mueva la etiqueta del eje más cerca del eje

Question

He eliminado las etiquetas en el eje y porque solo la cantidad relativa es realmente importante.

w <- c(34170,24911,20323,14290,9605,7803,7113,6031,5140,4469)
plot(1:length(w), w, type="b", xlab="Number of clusters",
     ylab="Within-cluster variance",
     main="K=5 eliminates most of the within-cluster variance",
     cex.main=1.5,
     cex.lab=1.2,
     font.main=20,
     yaxt=''n'',lab=c(length(w),5,7), # no ticks on y axis, all ticks on x
     family="Calibri Light")

Sin embargo, la supresión de esas etiquetas de marca deja mucho espacio en blanco entre la etiqueta del eje y ("Varianza dentro del clúster") y el eje y. ¿Hay una manera de empujarlo de nuevo? Si de alguna manera configuro las etiquetas de marca (invisibles) para que vayan dentro del eje, ¿la etiqueta del eje se asienta a lo largo del eje?

Answer 1

Ajustar mgp , ver ?par

title(ylab="Within-cluster variance", mgp=c(1,1,0), family="Calibri Light",cex.lab=1.2)

Answer 2

Intente configurar ylab="" en su llamada de la plot y use el title para establecer la etiqueta del eje y manualmente. Usando la line puede ajustar la posición de la etiqueta, por ejemplo:

plot(1:length(w), w, type="b", xlab="Number of clusters", ylab="",
     main="K=5 eliminates most of the within-cluster variance",
     cex.main=1.5,
     cex.lab=1.2,
     font.main=20,
     yaxt=''n'',lab=c(length(w),5,7), # no ticks on y axis, all ticks on x
     family="Calibri Light")

title(ylab="Within-cluster variance", line=0, cex.lab=1.2, family="Calibri Light")

Por favor, lea el ?title para más detalles.