RShiny中ggplot主题文字大小异常：首次部署正常，交互后变小

这个问题本质是Shiny绘图渲染的设备尺寸/基准设置在交互前后不一致，导致ggplot的字体缩放异常，和showtext或字体本身无关。下面是具体原因和解决思路：

核心原因 #

1. Shiny的动态画布缩放：交互触发重绘时，plotOutput的容器尺寸或绘图设备参数被自动调整，ggplot默认的字体大小（无单位）会基于新的设备尺寸被缩放，导致文字变小。
2. 绘图设备基准不一致：首次渲染和交互后重绘使用的绘图设备参数不同，尤其是pointsize基准值，使得相同的size参数对应不同的实际文字大小。

解决思路 #

1. 固定renderPlot的输出尺寸与DPI #

在renderPlot中明确指定width、height和res参数，确保每次渲染的画布物理尺寸一致：

output$your_plot <- renderPlot({
  # 你的ggplot代码
}, width = 800, height = 600, res = 96)

• res = 96匹配常规屏幕的DPI，避免跨设备的缩放差异；
• 也可以用相对单位（比如width = "100%"）搭配固定高度，保证容器尺寸稳定。

2. 给ggplot字体大小指定绝对单位 #

在theme的element_text中用unit()函数明确指定字体单位为pt（印刷点），替代默认的相对单位：

theme(
  axis.title.y = element_blank(),
  plot.title.position = "plot",
  panel.background = element_rect(fill = "white"),
  panel.grid = element_line(color = "grey91"),
  panel.border = element_rect(color = "grey85", fill = NA),
  text = element_text(color = "black", size = unit(14, "pt"), family = "Jost"),
  axis.title = element_text(color = "black", size = unit(14, "pt")),
  axis.text = element_text(color = "black", size = unit(14, "pt"), family = "Jost"),
  panel.grid.major.y = element_blank(),
  panel.grid.minor.y = element_blank()
)

pt是独立于设备的绝对单位，不会随画布尺寸变化而缩放。

3. 统一绘图设备的基准字号 #

在renderPlot中通过dev.args设置绘图设备的pointsize，确保每次渲染的基准字号一致：

output$your_plot <- renderPlot({
  # 你的ggplot代码
}, dev.args = list(pointsize = 14))

这个参数会作为ggplot字体大小的基准，避免设备切换导致的缩放差异。

4. 固定UI中plotOutput的尺寸 #

在UI端的plotOutput里指定固定的height和width，避免容器尺寸动态变化触发重绘时的缩放：

plotOutput("your_plot", width = "800px", height = "600px")

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