代码没问题，我这边可以实现。是不是你Rstudio的图形输出窗口太小了。

layout(matrix(c(1,1,2,0,3,4), 3, 2,byrow = TRUE))
layout.show(4)
par(mar=c(1,3,3,3))
hist(wt)
par(mar=c(1,3,1,1))
hist(mpg)
par(mar=c(3,3,1,1))
hist(disp)
par(mar=c(3,1,1,3))
hist(carb)