R n2mfrow 根据绘图数计算默认“mfrow”

说明

轻松设置在一页上绘制多个图形(以矩形布局)。这会计算 par(mfrow) 的合理默认值。

用法

n2mfrow(nr.plots, asp = 1)

参数

nr.plots	整数;您想要绘制的绘图图形的数量。
asp	正数；输出中的目标纵横比(列/行)。隐式硬连线到1；由于这一点和向后兼容性，对于 nr.plots <= 12 而言，当将 asp 更改为 1 左右时，会出现一些不连续的行为。

值

length-two 整数向量 (nr, nc) 给出正数的行和列，满足 nr * nc >= nr.plots ，目前，对于 asp = 1 、nr >= nc >= 1 。

注意

从概念上讲，这是一个二次整数优化问题，具有不等式约束 nr >= 1 、 nc >= 1 和 nr.plots >= nr*nc (可能还有 nr >= asp*nc )，以及必须通过调整权重组合的两个目标函数，比如 w ，例如 (nr.plots - nr*nc) + w |nr/nc - asp| 。

当前的算法很简单，并没有试图解决这些优化问题之一。

例子

require(graphics)

n2mfrow(8) # 3 x 3

n <- 5 ; x <- seq(-2, 2, length.out = 51)
## suppose now that 'n' is not known {inside function}
op <- par(mfrow = n2mfrow(n))
for (j in 1:n)
   plot(x, x^j, main = substitute(x^ exp, list(exp = j)), type = "l",
   col = "blue")

sapply(1:14, n2mfrow)
sapply(1:14, n2mfrow, asp=16/9)

作者

Martin Maechler; suggestion of asp by Michael Chirico.

也可以看看

par、layout。