ggplot 无法在侧面标题中以斜体显示数字

ggplot fails to put numbers in italic in facet title

我试图让我的一些方面成为斜体文本,此时我注意到我的数字没有变成斜体。我注意到轴标签中有相同的行为。重要的是,只有部分标签或只有某些方面应该是斜体。

有什么办法可以circumvent/fix这个吗?

MWE:

library(ggplot2)
library(tibble)
tibble(
    a = c('a1~italic(a1)', 'Not~Italic'),
    x = c(1,1),
    y = c(1,1)
) %>% 
    ggplot(aes(x,y)) + 
    geom_point() +
    facet_grid(a~., labeller = label_parsed) + 
    theme(
        strip.text = element_text(size = 20)
    ) +
    xlab(expression(italic(Italic~part~of~label1)~not~italic~part~of~label1))

reprex package (v2.0.0)

创建于 2022-03-02

澄清后更新:

library(ggplot2)
  library(tibble)
  tibble(
    a = c("italic('a1a1')", 'Not~Italic'),
    x = c(1,1),
    y = c(1,1)
  ) %>% 
    ggplot(aes(x,y)) + 
    geom_point() +
    facet_grid(a~., labeller = label_parsed) + 
    theme(
      strip.text = element_text(size = 20)
    ) +
    xlab(expression(italic(Italic~part~of~label1)~not~italic~part~of~label1))

第一个回答: 下面是我们如何使用 element_text():

library(ggplot2)
library(tibble)

tibble(
  a = 'a1a1',
  x = 1,
  y = 1
) %>% 
  ggplot(aes(x,y)) + 
  geom_point() +
  facet_grid(a~.)+
  theme(
    strip.text.y = element_text(
      size = 12, face = "italic")
    )