r - ggtext 和 element_markdown() 扩展水平间距？

Question

我正在使用 ggtextelement_markdown来修改字幕，并为一个单词添加颜色，即在plot_annotation图层中。我的代码如下：

p1 + p1 + plot_layout(nrow = 2, heights = c(4, 1.8)) +
  plot_annotation(title = "The Rise of Electric Charging", 
                  # Using inline html  to change the color
                  subtitle = "Examining the increase in <span style='color:#668F82;'>electric charging</span> stations over time.") &
  theme(plot.title = element_text(color = "White", size = 30, family = "Comfortaa", face = "bold"),
        plot.subtitle = element_markdown(color = "White", size = 15, family = "Comfortaa", face = "bold", margin = margin(10, 0, 5, 0, "mm")),
        plot.background = element_rect(fill = "#2A2D34", colour = "#2A2D34"))

虽然这有效，但它扩大了单词/字母之间的间距，如下所示：

将此与文本只是一个element_text项目时进行比较：

我想知道是否有人可能对为什么会发生这种情况有所了解？作为参考，在为单个地块添加标题时，会出现同样的问题。但是，在我正在使用的其他文件中，我可以使用相同的代码修改某些单词。