【发布时间】：2013-12-23 10:56:06
【问题描述】：
早安，
我是 R 新手。 我正在尝试组合 9 个图，将其排列为 3 x 3。
我有 a）7个杠杆图（）语法，每个创建1个图，和 b) 第 8 个杠杆图（）生成 2 个图，因为它是两个变量线性模型拟合。
使用下面的时，前 7 个图排列得很好，但最后一个不适合 3x3 网格，但会打开一个包含 2 个图的新窗口。
最小数据集（sample.txt）：
X Y
276.67 5.20
285.00 5.17
296.67 4.96
307.50 5.26
307.50 5.11
262.50 5.27
278.33 5.20
282.50 5.16
267.50 5.17
250.00 5.20
275.00 5.18
274.17 5.09
311.67 5.03
294.17 5.21
279.17 5.29
300.00 5.14
292.50 5.09
297.50 5.16
290.00 4.99
272.50 5.23
289.17 5.32
279.17 5.21
325.83 5.14
292.50 5.22
255.83 5.15
290.83 5.09
283.33 5.09
284.17 5.07
298.33 5.27
269.17 5.19
尝试使用 par(mfrow=c(3,3)) 以及 layout(matrix(c(1,2,3,4,5,6,7,8, 8), 3, 3, byrow = TRUE))。它不工作。仍然为杠杆图（）的最后一个语法打开新窗口。复制代码如下，
library(car)
sampledata <- read.table("D:/sample.txt", header=TRUE)
y.1 <- sampledata$Y
x.1 <- sampledata$X
x.2 <- (sampledata$X)^2
par(mfrow=c(3,3))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1))
leveragePlots(lm(y.1 ~ x.1 + x.2))
您知道如何强制将最后 2 个地块放置在相同的 3x3 布局中吗？如果你这样做，请给我建议。
我目前正在阅读 http://rfunction.com/archives/1538 的 layout()，不知道如何使用它来实现上述目标。
感谢您的领导。
【问题讨论】：
-
我们无法重现您的情节，因为您尚未提供对象，在本例中为
y.1至y.8。请阅读this post 并添加对象或组成一些数据，以便我们可以复制和粘贴您的代码。我已经为你添加了库调用。 -
@SlowLearner 对不起，如果我不完整。已适当包含示例数据和代码以复制此问题。感谢您的提醒。
标签： r