R-plot 轴标签中的向下箭头答案

【问题标题】：downwards arrow in R-plot axis labelR-plot 轴标签中的向下箭头
【发布时间】：2018-07-16 09:17:26
【问题描述】：

我在 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 %

给出“错误：

unexpected ')' in: "geom_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% 作为单词

不幸的是不是很有帮助。

我希望有人可以提供帮助。我有很多情节，所以我希望有人用 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 在： " 几何点()+ labs(x=expression("LW"[%down%"

【问题讨论】：

【解决方案1】：

我猜这就是你要找的东西：

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

编辑：

好的，这是一种 hack，但它确实有效。在plotmath 的文档中，您可以看到 %down% 像运算符一样工作，因此它需要前后两个字符串。这两个 empy 字符串为此服务：

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

【讨论】：

嘿 tyumuru，是的，差不多了。我希望箭头成为下标。不幸的是，labs(x=expression("LW"[%down%]"[W/m²]")) 我得到错误：在：“ geom_point()+ labs(x=expression("LW"[%down %"

【解决方案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, "]")))

或者bgroup如果你想要可缩放的分隔符

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

【讨论】：