在R基础图中，将轴标签移近轴

Question

我已经删除了y轴上的标签，因为只有相对数量非常重要。

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

但是，抑制这些刻度标签会在y轴标签（“簇内方差”）和y轴之间留下大量空白。有没有办法轻推它？如果我以某种方式将（不可见的）刻度标签设置为在轴内，那么轴标签是否会沿着轴固定？

Answer 1

尝试在ylab=""来电中设置plot并使用title手动设置y轴的标签。使用line，您可以调整标签的位置，例如：

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

请阅读?title了解详情。

Answer 2

调整mgp，参见?par

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