减少包含等值区域图的子图之间的空间

Question

我正在尝试在R中生成一个包含六个等值区域图的图。目前我的代码看起来像这样：

library(rgdal)
library(GISTools)

# code that loads data needed to generate choropleth maps not shown

par(mfrow = c(3,2), mar=c(0,0,0,0), oma=c(0,6,6,0))


choropleth(mn_county, mn_county$emppct.tert.2006, shades) 
mtext( 'Secondary', side=3, line=2)
mtext( '1998', side=2, line=2)

choropleth(mn_county, mn_county$emppct.tert.2006, shades) 
# choropleth maps are repeated in this post for simplicity
mtext( 'Tertiary', side=3, line=2)

choropleth(mn_county, mn_county$emppct.tert.2006, shades)
mtext( '2006', side=2, line=2)

choropleth(mn_county, mn_county$emppct.tert.2006, shades)
choropleth(mn_county, mn_county$emppct.tert.2006, shades)
mtext( '2014', side=2, line=2)

choropleth(mn_county, mn_county$emppct.tert.2006, shades)

问题是，即使我将边距mar设置为零，但列之间仍然存在较大差距（见下文）。不仅在等值区域地图之间，而且在行标题（1998年，2006年，2014年）和地图之间。

如何减少这个宽阔的空间？