r - ggplot轴标签r中的撇号和上标

Question

可重现的例子：

x1<-rnorm(5,5,1)
y1<-rnorm(5,5,1)
d<-data.frame(x1,y1)

ggplot(data=d,aes(x=x1,y=y1))+
  geom_point()+
  ylab(bquote('y (since year s'* ~ 1^st*' day)'))

我想在“年”之后添加一个撇号，我尝试添加'\\''但它不起作用。

已经有几个关于上标的问题：

带有ggplot2轴标签的下标和上标“-”或“+”？（离子化学符号）

如何在ggplot中写化学式

ggplot标签加上标，上标怎么出来？

但我找不到任何将它与撇号（由上标表达式识别）组合的东西。

标签： rggplot2apostrophesuperscript

Answer 1

单引号'和双引号"在 R 代码中通常可以互换。通过用双引号将包含它的字符串括起来来获取所需的单引号。

library(ggplot2)
x1<-rnorm(5,5,1)
y1<-rnorm(5,5,1)
d<-data.frame(x1,y1)

ggplot(data=d,aes(x=x1,y=y1))+
  geom_point()+
  ylab(bquote("y (since year's"* ~ 1^st*' day)'))

^{由reprex 包（v0.3.0）于 2021-01-02 创建}