能否通过theme设置ggplot中geom_text的字体大小？

这是Stack Exchange上旧问题的延伸，此前答案为“无法实现”，现确认当前ggplot2是否支持该功能。

问题重现 #

我通过全局主题设置了字体族与字号：

theme_set(theme_minimal(
  base_family="Calibri",
  base_size=8
))

但使用geom_text()时，文本并未继承theme中的字号设置，测试代码如下：

theme_set(theme_minimal(
  base_size=8
))

df <- data.frame(
  x = c(1, 2, 3), y = c(1, 2, 3), label = c("a", "b", "c")
)

ggplot(df, aes(x, y, label = label)) + geom_text()

效果截图：

目前ggplot2已支持让geom_text继承theme的字号设置，提供两种可行方法：

方法1：用rel()关联主题base_size #

在geom_text中通过size = rel(1)绑定主题的base_size，rel(1)表示与base_size完全一致，也可通过调整倍数（如rel(0.8)、rel(1.2)）来缩放文本：

theme_set(theme_minimal(
  base_size=8
))

df <- data.frame(
  x = c(1, 2, 3), y = c(1, 2, 3), label = c("a", "b", "c")
)

ggplot(df, aes(x, y, label = label)) + 
  geom_text(size = rel(1))

方法2：全局修改geom_text默认字号 #

通过update_geom_defaults()统一设置geom_text的默认字号，使其自动匹配主题的base_size：

theme_set(theme_minimal(
  base_size=8
))

# 转换单位：theme的size单位是pt，geom_text的size单位是mm
update_geom_defaults("text", list(size = theme_get()$text$size / .pt))

df <- data.frame(
  x = c(1, 2, 3), y = c(1, 2, 3), label = c("a", "b", "c")
)

ggplot(df, aes(x, y, label = label)) + geom_text()

注：.pt是ggplot2内置常量，用于转换点（pt）和毫米（mm）的单位关系，确保字号匹配。

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