如何在R中设置相对于绘图窗口大小的固定文本字号？

核心问题原因 #

你用cex参数无效，是因为它是相对当前设备默认字体大小的缩放比例——默认字体的物理尺寸（比如每英寸的点数）是固定的，窗口变大时，默认字体的绝对像素大小会跟着变大，但文本占窗口的比例还是会变。要让文本相对窗口大小固定，得根据窗口的实际尺寸动态计算cex。

方法1：按窗口物理尺寸比例缩放（简单快捷） #

直接根据窗口的物理尺寸（比如英寸）和基准窗口尺寸的比例来设置cex，保证文本相对窗口的大小一致。

示例代码：

# 基准窗口尺寸（比如你最初的7x7窗口）
base_dim <- 7

# 7x7窗口
quartz(base_dim, base_dim) # Windows/Linux替换成window(base_dim, base_dim)
plot(0, xlim = c(0,10), ylim = c(0,10), ylab = "", xlab = "")
# 计算当前窗口与基准窗口的尺寸比例
current_dim <- dev.size("in")[1] # 取宽度，也可以用min(dev.size("in"))兼顾宽高
cex_val <- current_dim / base_dim
text(5,5, 'This is an example for Stackexchange. \nHow can i chose a font size that is relative to the window\'s size?', cex = cex_val)

# 12x12窗口
quartz(12,12) # Windows/Linux替换成window(12,12)
plot(0, xlim = c(0,10), ylim = c(0,10), ylab = "", xlab = "")
current_dim <- dev.size("in")[1]
cex_val <- current_dim / base_dim
text(5,5, 'This is an example for Stackexchange. \nHow can i chose a font size that is relative to the window\'s size?', cex = cex_val)

方法2：精确控制文本占窗口的比例（更灵活） #

如果需要让文本占窗口的固定比例（比如宽度的80%），可以通过计算文本默认宽度和窗口用户坐标范围的比值来动态调整cex。

示例代码：

# 定义函数：根据目标占比计算相对cex
get_relative_cex <- function(target_ratio = 0.8) {
  # 获取当前绘图的用户坐标范围
  x_range <- par("usr")[2] - par("usr")[1]
  # 你的目标文本
  text_content <- 'This is an example for Stackexchange. \nHow can i chose a font size that is relative to the window\'s size?'
  # 获取cex=1时文本的宽度（用户坐标）
  default_width <- strwidth(text_content, cex = 1)
  # 计算需要的cex值，让文本宽度占窗口x范围的target_ratio比例
  return(x_range * target_ratio / default_width)
}

# 7x7窗口
quartz(7,7)
plot(0, xlim = c(0,10), ylim = c(0,10), ylab = "", xlab = "")
cex_val <- get_relative_cex()
text(5,5, 'This is an example for Stackexchange. \nHow can i chose a font size that is relative to the window\'s size?', cex = cex_val)

# 12x12窗口
quartz(12,12)
plot(0, xlim = c(0,10), ylim = c(0,10), ylab = "", xlab = "")
cex_val <- get_relative_cex()
text(5,5, 'This is an example for Stackexchange. \nHow can i chose a font size that is relative to the window\'s size?', cex = cex_val)

注意事项 #

• 如果手动调整窗口大小（比如最大化），需要重新运行绘图代码，因为dev.size()和par("usr")会随窗口变化而更新。
• 方法2中target_ratio可以根据需求调整，比如设为0.7让文本更紧凑。

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