在下面的示例中,我在.95处绘制自定义刻度线(根据Thomas的建议进行编辑以使标签水平):
d = matrix(runif(40), ncol=4)
colnames(d) = c('a','b','c','d')
barplot(
d,
beside=T,
col=c('#CD4E3C', '#816DC3','#569340', '#A87929'),
ylim=c(0,1),
cex.axis=.80,
main= 'Title',
las=1
)
abline(h= 1:10/10, col = 'lightgray', lty=3)
axis(side=2, at=c(.95), cex.axis=.75, tck=-.01, las=1)
abline(h= .95, col = '#000000', lty=3)
给出了:
我的自定义标签太靠近常规标签(我也需要),我想把标签贴近刻度线。我查看了
help(par)
如何使标签更接近轴?
编辑: 使刻度线标签水平有帮助,但我仍然希望将.95的标签缩进以反映缩短的刻度线。
答案 0 :(得分:1)
快速解决方案是将las=2
放入barplot()
和axis()
来电,使标签水平,并且它们会更清晰。
编辑:使用mtext
代替axis
:
mtext("0.95",2,.5,at=.95,las=2,cex=.75)