为何设置par(mar=rep(0,4))后barplot()仍给X轴边距添加空白？

Base R绘图函数可通过par()设置图形参数控制绘图区域，比如用mar参数修改或消除绘图周围的边距。但发现即使将所有边距设为0，barplot()便捷函数仍会在绘制X轴的边距（垂直绘图时为底部，水平绘图时为左侧）添加空白。请问该现象的原因是什么？如何让barplot()遵循par("mar")的设置？

最小可复现示例（MRE） #

无空白的对比示例 #

par(mar=rep(0, 4))
image(matrix(sample(1:100, 100), nrow=10))

注意：该图像绘制时无任何边距或空白。

barplot的异常示例 #

par(mar=rep(0, 4))
barplot(c(1))
barplot(c(1), horiz=TRUE)

注意：垂直绘图时底部存在空白，设置horiz=TRUE时左侧存在空白。

原因 #

barplot()函数内部自带自动边距调整逻辑：它默认会为轴标签、刻度等元素预留空间——即便你没有显式添加这些元素，函数的内部逻辑仍会强制留出一部分空白，这就导致它直接忽略了par("mar")的0边距设置。

解决方案 #

要让barplot()严格遵循par("mar")的设置，需要手动关闭它的自动预留空间逻辑，具体有两种可行方法：

方法1：关闭轴相关元素 #

当不需要轴标签、刻度时，直接禁用这些元素，让函数不再预留对应空间：

par(mar=rep(0, 4))
# 垂直条形图
barplot(c(1), axisnames = FALSE, axes = FALSE)
# 水平条形图
barplot(c(1), horiz=TRUE, axisnames = FALSE, axes = FALSE)

方法2：强制坐标轴匹配数据范围 #

如果需要保留轴元素但仍要消除多余空白，可以手动设置坐标轴范围，配合xaxs="i"/yaxs="i"参数（强制坐标轴范围严格匹配数据范围，不预留额外空白）：

par(mar=rep(0, 4), xaxs="i", yaxs="i")
# 垂直条形图
barplot(c(1), xlim=c(0,1), ylim=c(0,1), axes=FALSE)
# 水平条形图
barplot(c(1), horiz=TRUE, xlim=c(0,1), ylim=c(0,1), axes=FALSE)

内容的提问来源于stack exchange，提问作者jtatria