r - ggplot2：在 knitr 中带有 dev="tikz" 选项的贴标机中的摄氏度符号

Question

我想把摄氏度符号放在ggplot2 labeller. 下面给出了 MWE 及其输出：

library(ggplot2)
ggplot(data=mtcars, mapping = aes(x=drat, y=mpg)) + geom_point() +
  facet_wrap(facets = ~cyl, labeller = as_labeller(c(`4` = "4 °C",`6` = "6 °C", `8` = "8 °C")))

dev="tikz"但是，当在中使用选项时，相同的策略不起作用knitr。

Answer 1

使用 tikz 设备时，一种选择似乎是用原生乳胶编写数学。\circ是度数符号，因此您的标签之一可能是"$4^\\circ{C}$".

以下将使用dev = "tikz"并显示度数符号编织成 PDF：

ggplot(data=mtcars, mapping = aes(x=drat, y=mpg)) + geom_point() +
  facet_wrap(facets = ~cyl, 
         labeller = as_labeller(function(string) paste0("$", string, "^\\circ{C}$")))

要在数字和度数符号之间添加更多间距，您可以在标签中添加\\:或添加。\\;

labeller = as_labeller(function(string) paste0("$", string, "\\;^\\circ{C}$"))