Yes, with the layout(...)
function.
layout(matrix(c(1,2,3,3), 2, 2, byrow = TRUE))
hist(mtcars$wt)
hist(mtcars$mpg)
hist(mtcars$disp)
So layout(...)
takes a matrix where each element corresponds to a plot number. In this case, [1,1] corresponds to the first plot, [1,2] corresponds the the second plot, and [2,1:2] corresponds to the third plot.
This example is taken with slight modification from here.
If you want the bottom plot to be the same "width" as the two above, you can tweak the margins for that plot.
par(mar=c(4,4,2,2))
layout(matrix(c(1,2,3,3), 2, 2, byrow = TRUE))
hist(mtcars$wt)
hist(mtcars$mpg)
par(mar=c(2,14,2,14))
hist(mtcars$disp)
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…