如何解决R中is.na()应用于expression类型的警告问题？

问题原因 #

这段代码触发警告的核心原因是：使用annotate("text")时，同时传入expression()对象作为label参数，且设置了parse=TRUE。parse=TRUE的作用是将字符串标签解析为表达式，但直接传入expression对象会导致内部is.na()检查逻辑出错——expression不属于向量或列表类型，不符合is.na()的处理要求。

两种解决方案 #

方案1：用字符串标签配合parse=TRUE #

将label改为字符串形式，保留parse=TRUE，让ggplot自动解析表达式语法：

library(ggplot2)
ggplot() + 
  annotate("text", x = 1, y = 1, label='model 1, italic(R)^2: 0.50', 
           size = 14/.pt, col='blue', parse=TRUE)

方案2：用expression()配合parse=FALSE #

既然已经传入了expression对象，就不需要再解析，直接关闭parse参数：

library(ggplot2)
ggplot() + 
  annotate("text", x = 1, y = 1, label=expression(paste("model 1, ", italic(R)^2, ": 0.50")), 
           size = 14/.pt, col='blue', parse=FALSE)

两种方案都能正常渲染出带斜体R²的文本，且不会触发警告。

内容的提问来源于stack exchange，提问作者bluepole