web-dev-qa-db-fra.com

Dans le tracé de base R, déplacez l'étiquette de l'axe plus près de l'axe.

J'ai éliminé les étiquettes sur l'axe des y car seule la quantité relative est vraiment 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")

cluster plot

Cependant, la suppression de ces libellés laisse beaucoup d’espace blanc entre le libellé de l’axe des y ("Variance intra-grappe") et l’axe des y. Y a-t-il un moyen de le repousser? Si je mets en quelque sorte les étiquettes de coche (invisibles) à aller à l'intérieur l'axe, l'étiquette d'axe s'installera-t-elle le long de l'axe?

29
C8H10N4O2

Essayez de régler ylab="" dans votre appel plot et utilisez title pour définir manuellement l’étiquette de l’axe des y. En utilisant line, vous pouvez ajuster la position de l’étiquette, par exemple:

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")

enter image description here

Lisez s'il vous plaît ?title pour plus de détails.

42
sgibb

Ajustez mgp, voir ?par

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

enter image description here

22
xb.