как объединить графику в r

Question

У меня 10 временных рядов, я хочу нарисовать их графики, а затем объединить их (так, чтобы было 5 строк и 2 столбца). так что имя не отображается на оси y, но оно находится наверху графика, и каждый график имеет сетку.

сделал это, но это не работает

layout(matrix(c(1,2,3,4,5,6), 3, 2, byrow = TRUE)) 
plot(CPI, xlab ="data",main="Scatterplot of wt vs. mpg") 
plot(industry_prod, main="Scatterplot of wt vs disp") 
plot(m2, main="Scatterplot of wt vs. mpg") 
plot(interbank_rate, main="Scatterplot of wt vs disp") 
plot(ex_rate, main="Scatterplot of wt vs. mpg") 
plot(unempl_rate, main="Scatterplot of wt vs disp")
grid()

Answer 1

То есть это можно сделать в обычном R.

old.par <- par(mfrow=c(3, 2)) # this statement is necessary to restore the setting later

plot(CPI, xlab ="data",main="Scatterplot of wt vs. mpg") 
plot(industry_prod, main="Scatterplot of wt vs disp") 
plot(m2, main="Scatterplot of wt vs. mpg") 
plot(interbank_rate, main="Scatterplot of wt vs disp") 
plot(ex_rate, main="Scatterplot of wt vs. mpg") 
plot(unempl_rate, main="Scatterplot of wt vs disp")

par(old.par) # restore previous setting (so that you can do single plots again)