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

Question

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

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

Answer 1

这里有一个链接，指向一个优秀的 wiki，解释了如何在 ggplot2 中添加希腊符号。总之，以下是获取希腊符号文本标签的方法

1. ：在geom_text或annotateparse = T >。
2. 轴标签：使用表达式(alpha)获取希腊字母。
3. 构面标签：在构面内使用labeller = label_parsed。
4. 图例标签：在图例标签中使用bquote(alpha == .(value))。

您可以在链接

EDIT 中查看这些选项的详细用法。沿刻度线使用希腊符号的目标可以如下实现。

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。

Answer 2

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

无需表达式或其他包。
不确定这是否是 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 包 (v0.3.0)}

Answer 3

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

以下是希腊字符的完整列表：

ααα
β β β
γ 伽玛
Δ δ δ
Ε ε epsilon
Ζ zeta
η eta
θ θ θ
ι ι iota
κκκ
Λ λ 拉姆达
μμμ
Ν ν nu
Ξ Ξ xi
Ο ο omicron
π π pi
Ρ ρ rho
Σ σ 西格玛
τ τ τ
Υ υ upsilon
Φ Φ phi
Χ χ chi
ψ ψ psi
Ω Ω 欧米茄

编辑：从评论中复制，与其他单词结合使用时，请使用：表达式(Delta*"price")

Answer 4

您不需要 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))

此外，一些评论（目前尚未得到答复）询问是否在希腊字母后添加星号 (*)。 表达式(alpha~"*") 有效，所以我建议尝试一下。

更多评论询问如何获取Δ Price，我发现实现这一目标的最直接方法是表达式(Delta~price))。如果需要在希腊字母前添加一些内容，也可以这样做：
表达式(Indicative~Delta~price) 得到：