非等距轴标签

Question

有人知道如何调整基础图中的标签不等距吗？我有彼此不同距离的刻度线，并希望标签在这些之间居中。 axis函数的hadj参数只接受一个值。

Answer 1

这个问题有一个明确的答案（尽管与评论中建议的略有不同）：

ticks <- c(0, 1, 3, 6, 10)
labels <- c("one", "two", "three", "four") # one fewer than ticks
label.positions <- ticks[-1] - diff(ticks) / 2
plot(1:10, 1:10, xlim=c(-1, 11), axes=FALSE, ann=FALSE)
axis(1, at=ticks, labels=FALSE)
axis(1, at=label.positions, labels=labels, tick=FALSE)