Как выделить курсивом 1 категорию в легенде в ggplot2

Question

Для моей легенды в ggplot2 у меня есть 2 категории, как выделить курсивом только 1 категорию, а не другую?

Спасибо!

Answer 1

Ты можешь использовать expression а также italic создавать курсивом текст на этикетках.

data("mtcars")
library(ggplot2)

p <- ggplot(data = mtcars, aes(x = as.factor(am), fill = as.factor(am))) + 
  geom_bar() + 
  scale_fill_discrete("Transmission", breaks = c(0, 1),
                       labels = c("Automatic", expression(italic("Manual"))))
p

Answer 2

Я работал над более простым и гибким способом достижения этой цели с помощью пакета ggtext, который позволяет использовать стиль уценки в ggplot. В настоящее время он находится в стадии разработки, но вскоре (начало 2020 г.) будет выпущен для CRAN.

library(ggplot2) # may require: remotes::install_github("tidyverse/ggplot2")
library(ggtext)  # remotes::install_github("clauswilke/ggtext")

ggplot(data = mtcars, aes(x = as.factor(am), fill = as.factor(am))) + 
  geom_bar() + 
  scale_fill_discrete(
    "Transmission",
    breaks = c(0, 1),
    labels = c("Automatic", "*Manual*")
  ) +
  theme(legend.text = element_markdown())

^{Создано 01.01.2020 пакетом REPEX (v0.3.0)}