Есть ли в любом случае упорядочить участки с помощью функции par ()? - PullRequest
1 голос
/ 01 мая 2020

Я создал 3 строки по 3 фигуры в каждой и хотел бы центрировать последние 2 фигуры для достижения визуальной репрезентативности, поскольку они выровнены по левой стороне моего многократного графика. Есть ли способ сделать это без изменения размера графиков?

dat=read.csv("r1new.csv", header=TRUE, sep=",", dec="."); dat
par(mfrow=c(4,3))
par(mar=c(4,4,2,2))
############################################### WC 0.1 ###############################################
res.lm1 = lm(dat$wc_10_1~dat$m_wc_10_1, data=dat)
res.lm2 = lm(dat$wc_10_3~dat$m_wc_10_3, data=dat)
res.lm3 = lm(dat$wc_10_5~dat$m_wc_10_5, data=dat)
res.res1 = resid(res.lm1)
res.res2 = resid(res.lm2)
res.res3 = resid(res.lm3)
plot(dat$m_wc_10_1 [1:1731], res.res1, 
      ylab="Residuals", 
      xlab="modelled water content, 0.1 m", 
      main="",
      xlim=c(0.05,0.55), ylim=c(-0.25,0.15),
      type="p",
      col="blue",
      pch=16) 
points(dat$m_wc_10_3 [1:814],res.res2, col="green3",pch=16)
points(dat$m_wc_10_5 [1:1768],res.res3, col="red",pch=16)
abline(0, 0, col="gold3", lwd=2) 

1 Ответ

1 голос
/ 01 мая 2020

Вы должны проверить layout. Вам необходимо определить матрицу, которая показывает порядок и расположение графиков. Затем они заполняются в соответствии с номером. Я считаю, что следующий пример примерно то, что вы ищете:

M <- matrix(rep(1:12, each = 2), nrow = 4, ncol = 3*2, byrow = T)
M[4,] <- c(0,10,10,11,11,0)
M

png("testplot.png", width = 6, height = 7, units = "in", res = 200)
layout(M)
layout.show(11)
op <- par(mar = c(3,3,0.5,0.5))
for(i in seq(11)){
  plot(rnorm(10), rnorm(10))
}
par(op)
dev.off()

enter image description here

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...