R layout 指定複雜的繪圖安排

說明

layout 將設備劃分為與矩陣 mat 中一樣多的行和列，並在相應參數中指定 column-widths 和 row-heights。

用法

layout(mat, widths = rep.int(1, ncol(mat)),
       heights = rep.int(1, nrow(mat)), respect = FALSE)

layout.show(n = 1)
lcm(x)

參數

mat	指定輸出設備上下一個 N 圖形位置的矩陣對象。矩陣中的每個值必須是0 或正整數。如果N 是矩陣中最大的正整數，則整數\{1, \dots, N-1\} 也必須在矩陣中至少出現一次。
widths	設備上列寬度值的向量。相對寬度用數值指定。絕對寬度(以厘米為單位)由 lcm() 函數指定(參見示例)。
heights	設備上行高值的向量。可以指定相對和絕對高度，請參閱上麵的widths。
respect	邏輯值或矩陣對象。如果是後者，則它必須具有與 mat 相同的維度，並且矩陣中的每個值必須是 0 或 1 。
n	要繪製的圖形數量。
x	被解釋為厘米數的尺寸。

細節

根據 mat 中 i 出現的行和列，為圖 i 分配由這些行和列的子集組成的區域。

respect 參數控製單元 column-width 是否與設備上的單元 row-height 具有相同的物理測量值。

布局中的行數和列數以及單元格總數 (10007) 存在限製(當前為 200)。

layout.show(n) 繪製(部分)當前布局，即下一個n 圖形的輪廓。

lcm 是一個簡單的函數，用作指定 layout() 的 widths 和 heights 參數的絕對尺寸的接口。

值

layout 返回數字的數量， N ，見上文。

警告

這些函數與在設備上排列繪圖的其他機製完全不兼容： par(mfrow) 、 par(mfcol) 和 split.screen 。

例子

def.par <- par(no.readonly = TRUE) # save default, for resetting...

## divide the device into two rows and two columns
## allocate figure 1 all of row 1
## allocate figure 2 the intersection of column 2 and row 2
layout(matrix(c(1,1,0,2), 2, 2, byrow = TRUE))
## show the regions that have been allocated to each plot
layout.show(2)

## divide device into two rows and two columns
## allocate figure 1 and figure 2 as above
## respect relations between widths and heights
nf <- layout(matrix(c(1,1,0,2), 2, 2, byrow = TRUE), respect = TRUE)
layout.show(nf)

## create single figure which is 5cm square
nf <- layout(matrix(1), widths = lcm(5), heights = lcm(5))
layout.show(nf)


##-- Create a scatterplot with marginal histograms -----

x <- pmin(3, pmax(-3, stats::rnorm(50)))
y <- pmin(3, pmax(-3, stats::rnorm(50)))
xhist <- hist(x, breaks = seq(-3,3,0.5), plot = FALSE)
yhist <- hist(y, breaks = seq(-3,3,0.5), plot = FALSE)
top <- max(c(xhist$counts, yhist$counts))
xrange <- c(-3, 3)
yrange <- c(-3, 3)
nf <- layout(matrix(c(2,0,1,3),2,2,byrow = TRUE), c(3,1), c(1,3), TRUE)
layout.show(nf)

par(mar = c(3,3,1,1))
plot(x, y, xlim = xrange, ylim = yrange, xlab = "", ylab = "")
par(mar = c(0,3,1,1))
barplot(xhist$counts, axes = FALSE, ylim = c(0, top), space = 0)
par(mar = c(3,0,1,1))
barplot(yhist$counts, axes = FALSE, xlim = c(0, top), space = 0, horiz = TRUE)

par(def.par)  #- reset to default

作者

Paul R. Murrell

參考

Murrell, P. R. (1999). Layouts: A mechanism for arranging plots on a page. Journal of Computational and Graphical Statistics, 8, 121-134. doi:10.2307/1390924.

Chapter 5 of Paul Murrell's Ph.D. thesis.

Murrell, P. (2005). R Graphics. Chapman & Hall/CRC Press.

也可以看看

par 帶有參數 mfrow 、 mfcol 或 mfg 。