如何在ggplot2中使用希腊符号？

Question

我的类别需要用希腊字母命名。我正在使用ggplot2，它与数据完美结合。不幸的是，我无法弄清楚如何将这些希腊符号放在 x 轴上（在刻度线处）并使它们出现在图例中。有什么办法吗？

更新： 我查看了link，但是，没有描述完成我想做的事情的好方法。

Answer 1

最简单的解决方案：使用 Unicode 字符

不需要expression 或其他软件包。
不确定这是否是 ggplot 的新功能，但它可以工作。 它还可以轻松混合希腊文本和常规文本（例如在刻度上添加“*”）

只需在文本字符串中使用 unicode 字符。 似乎适用于我能想到的所有选项。 编辑：以前它不适用于构面标签。这显然已在某个时候得到修复。

library(ggplot2)
ggplot(mtcars, 
       aes(mpg, disp, color=factor(gear))) + 
  geom_point() + 
  labs(title="Title (\u03b1 \u03a9)", # works fine
       x= "\u03b1 \u03a9 x-axis title",    # works fine
       y= "\u03b1 \u03a9 y-axis title",    # works fine
       color="\u03b1 \u03a9 Groups:") +  # works fine
  scale_x_continuous(breaks = seq(10, 35, 5), 
                     labels = paste0(seq(10, 35, 5), "\u03a9*")) + # works fine; to label the ticks
  ggrepel::geom_text_repel(aes(label = paste(rownames(mtcars), "\u03a9*")), size =3) + # works fine 
  facet_grid(~paste0(gear, " Gears \u03a9"))

^{由reprex package (v0.3.0) 于 2019 年 8 月 28 日创建}

Answer 2

你不需要latex2exp 包来做你想做的事。以下代码可以解决问题。

ggplot(smr, aes(Fuel.Rate, Eng.Speed.Ave., color=Eng.Speed.Max.)) + 
  geom_point() + 
  labs(title=expression("Fuel Efficiency"~(alpha*Omega)), 
color=expression(alpha*Omega), x=expression(Delta~price))

此外，一些 cmets（截至目前尚未得到答复）询问在希腊字母后放置星号 (*)。 expression(alpha~"*") 有效，所以我建议尝试一下。

更多 cmets 询问有关获得Δ Price 的问题，我发现实现这一目标的最直接方法是expression(Delta~price))。如果你需要在希腊字母之前添加一些东西，你也可以这样做： expression(Indicative~Delta~price) 得到你：

Answer 3

使用expression(delta)，其中“delta”表示小写δ，“Delta”表示大写Δ。

这里是希腊字符的完整列表：

ααα
β β β
Γ γ 伽马
Δ δ δ
Ε ε epsilon
ζ ζ zeta
Η η η
Θ θ theta
ι ι iota
Κ κ kappa
Λ λ λ
μμμ
Ν ν nu
Ξ ξ xi
Ο ο 微米
Π π π
Ρ ρ ρ
Σ 西格玛
Τ τ τ
Υ υ upsilon
Φ φ φ
χ χ
Ψ ψ psi
Ωωω

编辑：复制自 cmets，与其他词结合使用时，如：expression(Delta*"price")

Answer 4

这是一个优秀的 wiki 的 link，它解释了如何在 ggplot2 中放置希腊符号。总而言之，这是您获取希腊符号的方法

1. 文本标签：在geom_text 或annotate 中使用parse = T。
2. 轴标签：使用expression(alpha) 获取希腊字母。
3. 构面标签：在facet 中使用labeller = label_parsed。
4. 图例标签：在图例标签中使用bquote(alpha == .(value))。

您可以在链接中查看这些选项的详细用法

编辑。沿刻度线使用希腊符号的目的可以实现如下

require(ggplot2);
data(tips);
p0 = qplot(sex, data = tips, geom = 'bar');
p1 = p0 + scale_x_discrete(labels = c('Female' = expression(alpha),
                                      'Male'   = expression(beta)));
print(p1);

有关执行此操作时可用的各种符号以及如何使用它们的完整文档，请参阅?plotmath。