Я использую следующую формулу для построения 5 графиков вместе:
my_data <- as.data.frame(datasets::volcano)
layout(matrix(c(1,2,3,4,5,6), 3, 2, byrow = TRUE))
par(mar=c(1,1,1,1))
plot(my_data$V1, my_data$V2)
plot(my_data$V3, my_data$V4)
plot(my_data$V5, my_data$V6)
plot(my_data$V7, my_data$V8)
plot(my_data$V9, my_data$V10)
plot.new()
![5 plots](https://i.stack.imgur.com/zD4SL.png)
Это работает хорошо, но я теряю масштаб у -ось 1, 3 и 5-го участков и ось х последних. Это будет происходить с любыми будущими, пока я не стану dev.off ().
Спасибо!