3

在以下示例中,我在 0.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) 

如何使该标签更接近轴?

编辑:使刻度线标签水平有帮助,但我仍然想缩进 0.95 的标签以反映缩短的刻度线。

4

1 回答 1

1

快速解决方案是将las=2您的barplot()axis()调用都放入以使标签水平,它们会更清晰。

编辑:使用mtext而不是axis

mtext("0.95",2,.5,at=.95,las=2,cex=.75)

于 2013-05-07T21:43:52.650 回答