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