ggplotの注釈のテキストフォーマット

Question

HTMLコードで注釈を付けることは可能ですか？テキスト全体ではなく、ほんの数語に色を付けようとしています。

library(tidyverse)
#> Warning: package 'ggplot2' was built under R version 4.0.2

mtcars %>%
  ggplot(aes(x = hp, y = mpg)) +
  geom_point() +
  annotate(geom = "text", label = "I'm <span style='color: red;'>red</span> \n and i'm <span style='color: orange;'>orange</span>",
           x = 250, y = 25)

^{reprexパッケージ（v0.3.0）によって2020-08-22に作成されました}

Answer 1

パッケージ 'ggtext'を使用できます。かなり新しいです。あなたの例に必要な唯一の変更は、geomを置き換えることです：の"richtext"代わりにを使用します"text"。

library(tidyverse)
library(ggtext)
#> Warning: package 'ggplot2' was built under R version 4.0.2

mtcars %>%
  ggplot(aes(x = hp, y = mpg)) +
  geom_point() +
  annotate(geom = "richtext", label = "I'm <span style='color: red;'>red</span> \n and i'm <span style='color: orange;'>orange</span>",
           x = 250, y = 25)

fill = NA背景を削除するために使用することが可能です。境界線を削除するには、をlabel.color = NA使用できます。

library(tidyverse)
library(ggtext)

mtcars %>%
  ggplot(aes(x = hp, y = mpg)) +
  geom_point() +
  annotate(geom = "richtext", label = "I'm <span style='color: red;'>red</span>\n and i'm <span style='color: orange;'>orange</span>",
           x = 250, y = 25, fill = NA, label.color = NA)