Покажите два единицы измерения на осях оси в ggplot2

Как можно (если вообще) показать две альтернативные единицы на осях оси в ggplot2? То, что я хотел бы достичь, выглядит примерно так:

enter image description here

Ответ 1

Вот хакерский способ сделать это:

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()

enter image description here