Использование символа Юникод (плюс минус) внутри ggplot2

Question

Я пытаюсь построить график, который включает символ Юникод (знак плюс-минус , знак U + 00B1)

Вот некоторые поддельные данные:

library(tidyverse)
set.seed(1)
df <- crossing(
  Rated_Movement = c("Running", "Jumping"),
  Rater = c("John Snow", "Batman", "Hulk")) %>% 
  mutate(
    Error = runif(n = 6, min = 0, max=2))

Вот мой код для сюжета:

ggplot(df, aes(x = Rated_Movement, y = Rater, fill = Error)) + 
  geom_tile(color = "black", size = 0.5, alpha = 0.8)+
  geom_text(aes(label = paste("+-", round(Error,2))))+
  scale_fill_gradientn(colours = terrain.colors(10))+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())

Вот сюжет:

Есть ли способ, которым я могу изменить символ + - на Unicode U + 00B1

Я попытался использовать обратную косую черту для выхода: паста ("\ U + 00B1", круглая (ошибка, 2)) Но я получаю ошибку: "Ошибка: '\ U' используется без шестнадцатеричных цифр в символьной строке, начинающейся" "\ U" "

Любая помощь будет высоко ценится. С наилучшими пожеланиями

Answer 1

здесь есть два пути:

ggplot(df, aes(x = Rated_Movement, y = Rater, fill = Error)) + 
  geom_tile(color = "black", size = 0.5, alpha = 0.8)+
  geom_text(aes(label = paste("±", round(Error,2))))+
  scale_fill_gradientn(colours = terrain.colors(10))+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())

ggplot(df, aes(x = Rated_Movement, y = Rater, fill = Error)) + 
  geom_tile(color = "black", size = 0.5, alpha = 0.8)+
  geom_text(aes(label = paste("\u00B1", round(Error,2)))) +
  scale_fill_gradientn(colours = terrain.colors(10))+
  theme(panel.grid.major = element_blank(), panel.grid.minor = element_blank())