cara menghapus ruang putih antara dua plot di r

> par(mfrow=c(2,1))
> par(mar=c(0,1,1,1))
> plot(1:10)
> par(mar=c(1,1,0,1))
> plot(1:10)
Rocku0