R图轴标签中的向下箭头

时间:2018-07-16 09:17:26

标签: r ggplot2 axis-labels

我在Latex中有一个名为 \ LW $ _ \ downarrow $ 的变量。 您可以想象,我想使用与轴标签相同的短语,并添加[W /m²]或[W m ^ -2]的单位

我设法做到了:

library(ggplot2)
data <- data.frame(x=c(1:5), y=c(2:6))
ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression(LW%down%. ))

但是

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression(LW%down% )) #no point behind the second %

给出“错误:

  

“ gem_point()+ labs(x = expression(LW%down%)””中的意外')'

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=paste(expression(LW%down%. ), "[W/m²]"))

给出了这一点:以%down%作为单词

enter image description here

不幸的是不是很有帮助。

我希望有人能提供帮助。我有很多图,所以我希望有人这样用inkscape进行手动编辑听起来真的不是一个好选择。


tyumru通过

给了我正确方向的好提示
ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression("LW"%down%"[W/m²]"))

我为什么要用

将箭头放在下标中
ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression("LW"[%down%]"[W/m²]"))

不幸的是我得到

错误:出现以下意外的SPECIAL: “ geom_point()+   实验室(x = expression(“ LW” [%down%“

2 个答案:

答案 0 :(得分:3)

我想这就是您要寻找的东西

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression("LW"%down%"[W/m²]"))

编辑:

好吧,这是一种破解,但是可以。在plotmath的文档中,您可以看到%down%的作用类似于运算符,因此前后需要两个字符串。为此,使用了两个empy字符串:

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression(paste(LW[""%down%""]," [W/m²]")))

enter image description here

答案 1 :(得分:2)

help('plotmath')中,您可以使用group('[',w / m^2, ']')将单位包装在定界符中

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression(LW %down% group("[", w/m^2, "]")))

enter image description here

bgroup(如果您想要可缩放的定界符)

ggplot(data = data, aes(x=x, y=y))+
  geom_point()+
  labs(x=expression(LW %down% bgroup("[", over(w, m^2), "]")))

enter image description here