时间戳

首页 > 解决方案 > 在字母前获取上标的代码顺序

r - 在字母前获取上标的代码顺序

问题描述

我有一个图表，我希望 x 轴标签读取 206Pb/207Pb 并带有上标数字。除非数字出现在“Pb”这个词之后，否则我无法让它工作。有谁知道如何让他们排在前面，最好在中间加上反斜杠？

谢谢。

p1<-ggplot(waplead, aes(x =Pb206207 , y = Depth))+
  labs(y = "Depth (cm)")+
  geom_lineh(size=1.1)+
  geom_errorbarh((aes(xmin=Pb206207-Pb206207Error, xmax=Pb206207+Pb206207Error)))+
  geom_point(shape = 21, size = 3,fill="#FFFFFF")+
  theme_classic()+
  scale_y_reverse(limits=c(50,0),breaks=seq(0,50,5))+
  xlab(bquote(' '~ '' ~~ Pb^206~Pb^207*''))



p1

标签： rggplot2

解决方案

你可以这样做expression

p1<-ggplot(waplead, aes(x =Pb206207 , y = Depth))+
    geom_lineh(size=1.1)+
    geom_errorbarh((aes(xmin=Pb206207-Pb206207Error, xmax=Pb206207+Pb206207Error)))+
    geom_point(shape = 21, size = 3,fill="#FFFFFF")+
    theme_classic()+
    scale_y_reverse(limits=c(50,0),breaks=seq(0,50,5))+
    labs(x=expression(paste(""^{206}~Pb~"/"^{207}~Pb)),
         y="Depth (cm)")
p1

推荐阅读