如何防止在 R 中调整字体、绘图对象等的大小？

Question

我想在同一个图像中有多个图，并且我想根据图像有不同数量的图。准确地说，我首先创建了一个 1x2 的图矩阵，然后是一个 3x2 的图矩阵。我想对这两个图像使用相同的基本设置 - 尤其是相同的字体大小，因为这是用于纸张，并且字体大小必须至少为 6 pt。

为了实现这一点，我为 R 编写了以下代码：

filename = "test.png"
font.pt = 6    # font size in pts (1/72 inches)
total.w = 3    # total width in inches
plot.ar = 4/3  # aspect ratio for single plot
mat.col = 2    # number of columns
mat.row = 1    # number of rows
dpi = 300

plot.mar = c(3, 3, 1, 2) + 0.1
plot.mgp = c(2, 1, 0)
plot.w = total.w / mat.col - 0.2 * plot.mar[2] - 0.2 * plot.mar[4]
plot.h = plot.w / plot.ar
total.h = (plot.h + 0.2 * plot.mar[1] + 0.2 * plot.mar[3]) * mat.row

png(filename, width = total.w, height = total.h, res = dpi * 12 / font.pt, units = "in")

par(mfrow = c(mat.row, mat.col), mai = 0.2 * plot.mar, mgp = plot.mgp)

plot(1, 1, axes = T, typ = 'p', pch = 20, xlab = "Y Test", ylab = "X Test")

dev.off()

如您所见，我将总宽度设置为 3 英寸，然后计算我的图像的总高度，以便绘图的纵横比正确。字体大小只会将分辨率改变一个因素。 无论如何，现在的问题是，当我从mat.row = 1 转到mat.row = 3 时，字体大小发生了显着变化。其他事情也会发生变化，例如轴和边距的标签，尽管我之前专门设置了英寸。看看：

设置为 3 行时（裁剪图像）：

仅设置 1 行时（裁剪图像）：

如何防止这种情况发生？据我所知，我做了我能做的一切。这花了我相当长的时间，所以我想让它工作而不是切换到gglplot 并再次从头开始学习所有内容。它也足够小，我真的希望我只是错过了一些非常明显的东西。

Answer 1

在?par我们可以找到：

在恰好有两行和两列的布局中，“cex”的基值 减少 0.83 倍：如果有三个或更多 行或列，缩减因子为 0.66。

因此，当您将 mfrow 的值从 (2, 1) 更改为 (2, 3) 时，cex 的值将从 0.83 更改为 0.66。 cex 影响字体大小和文本行高。

因此，您可以手动为绘图指定 cex 值。

par(mfrow = c(mat.row, mat.col), mai = 0.2 * plot.mar, mgp = plot.mgp, cex = 1)

希望，这正是你所需要的。

mat.row = 1 的绘图（裁剪）： 并绘制mat.row = 3（裁剪）：