这是个奇怪的小问题。我想用变量的单位来标记一些图，但是如果我在标签上添加空格，我会得到一个错误。
例如，这个块返回一个漂亮的上标字符：

library(tidyverse)

df <- tibble(x = c(1:10), y = c(1:10))

ggplot(data = df, aes(x = x, y = y)) +
  geom_point() +
  annotate(geom = "text", x = -Inf, y = Inf, hjust = -1, vjust = 1.1,
           label = "a**2", parse = TRUE)

字符串
但是，如果我在标签上添加一个空格，例如：

ggplot(data = df, aes(x = x, y = y)) +
  geom_point() +
  annotate(geom = "text", x = -Inf, y = Inf, hjust = -1, vjust = 1.1,
           label = "Some words and a**2", parse = TRUE)

型
我得到：

Error in `annotate()`:
! Problem while converting geom to grob.
ℹ Error occurred in the 2nd layer.
Caused by error in `parse()`:
! <text>:1:6: unexpected symbol
1: Some words

型

有没有人有一个解决方案，以创建标签与空格和上标？