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。