R：如何在 base R 中的绘图上放置多行刻度标签？

Question

在基本 R 图中，我想将多行标签附加到刻度。这是一个测试用例，首先是简单的单行标签：

# plot some graph
x = (-10:10)/5
y = x^2
plot (y~x,type="l",axes=F)

ticks = c(-2,-1,0,1,2)            # tick positions
labels = c("-2","-1","0","1","2") # tick labels
axis (1,at=ticks,labels=labels)

现在我想让一些标签延伸到几行文本。当我使用

labels = c("-2","-1","centre\n0","1","2") # some tick labels multi-line

标签的第二行添加在现有标签之上，在轴和标签之间留下不足 space。刻度标签在底部对齐。

如何 (1) 让它们在顶部对齐或； (2) 我可以将所有刻度标签向下移动以便在轴和标签之间获得更多 space 吗？

在此先感谢您的帮助！

Answer 1

我总是发现将第二条线绘制为前一条线之上的新图更容易。据我所知，您的数据存在问题。我真的不知道你的意图是什么，但我会在下面详细解释这个方法。

我的问题是您的第二个标签与第一个标签相同，除了您在 x=0 处添加的单词 'centre'。因此，在我的例子中，我创建了一个新的标签变量，它只有第二行元素，即只有单词 'centre'，其他所有内容都是空白的。

数据

这是你的数据

# plot some graph
x = (-10:10)/5
y = x^2
plot (y~x,type="l",axes=F)

ticks = c(-2,-1,0,1,2)            # tick positions
labels = c("-2","-1","0","1","2") # tick labels
axis (1,at=ticks,labels=labels)

解决方案1

在底部正确对齐：

在本例中，我创建了一个具有更长底部边距的新绘图。然后我只为此创建一个底轴并将其设置为白色，以便只有标签可见：

#bottom
#new plot
par(new=TRUE)       
#new margins. default is c(5,4,4,2).First value is the bottom margin.
par(mar=c(4,4,4,2))  
#new labels
labels = c("","","centre","","") # some tick labels multi-line
#make the axis
axis (1,at=ticks,labels=labels, col='white')

如果您需要以相反的方式绘制中心和零，只需更改标签即可。

解决方案2

在顶部正确对齐（如果我明白你的意思的话）：

在您的数据轴中需要：axis(3,at=ticks,labels=labels)。那里的三个显示它应该在顶部对齐

逻辑同上，但需要更改相应的边距即第三个值：

#top
par(new=TRUE)
par(mar=c(5,4,3,2))
labels = c("","","centre","","") # some tick labels multi-line
axis (3,at=ticks,labels=labels, col='white')

R：如何在 base R 中的绘图上放置多行刻度标签？

R: How do I position multi-line tick labels at plots in base R?

plot

r