как установить x и y пределов одинаковые значения?

это некоторые данные, которые я сделал. у меня есть два фрейма данных с двумя переменными в каждом.

var1 <- (1:10)*(rnorm(10,2,0.1))var2 <- (6:15)*(rnorm(10,1,0.1))       df1 <- as.data.frame(cbind(var1,var2))var3 <- (1:10)*(rnorm(10,3,0.1))var4 <- (6:15)*(rnorm(10,1.5,0.1))       df2 <- as.data.frame(cbind(var3,var4))

есть петля для построения первой переменной df1 и df2, а второй из df1 и df2 тоже.

plot_list = list()  for(i in 1:ncol(df1)){        p=ggplot(df1,                  aes_string(x=df1[,i],                             y=df2[,i]))+                geom_point()        plot_list[[i]] = p}library(gridextra)do.call("grid.arrange", c(plot_list[c(1:2)], ncol=1)) 

и это сюжет, который я получил.

enter image description here

до сих пор так хорошо. но я хотел бы, чтобы x и y в пределах каждого участка были те же ограничения, основанные на max и min. например, в приведенном выше сюжете оба x и должен идти от ~5 до ~30. в указанных ниже участка x и должен идти от ~6 до ~24. я мог бы установить пределы вручную, но мне нужно сделать это для многих участков.

есть ли способ, чтобы установить границы по x и y для каждого участка на основе min и max наблюдается в любой оси?

спасибо за помощь.