在ggplot2中的轴刻度上显示两个测量单位

Bor*_*lik 10 graphics r ggplot2

如何(如果有的话)在ggplot2中的轴刻度上显示两个替代单位?我想要实现的是这样的:

在此输入图像描述

edd*_*ddi 3

这是一种巧妙的方法:

d = data.frame(x = 1:20, y = rnorm(20, 5, 5))

ggplot(data = d, aes(x = x, y = y)) +
  scale_x_continuous(breaks = c(1:20, seq(2.54, 20, 2.54)),
                     labels = c(1:20, paste0("\n", 1:as.integer(20/2.54), "\""))) +
  geom_point()
Run Code Online (Sandbox Code Playgroud)

在此输入图像描述