如何去除RStudio中绘制图像的周边空白？

问题原因 #

你使用的load.image是EBImage包的函数，它对应的plot方法有自身的布局逻辑，单独在plot中设置mar参数可能被覆盖，导致边距无法完全消除。

具体解决方案 #

方法1：先设置全局绘图参数再绘图

先通过par设置全局边距，同时指定mar（文本边距）和mai（英寸边距），确保覆盖默认设置：

library(EBImage)
# 设置全局边距为0
par(mar = c(0, 0, 0, 0), mai = c(0, 0, 0, 0))
# 加载图片
img <- load.image("solidblack.png")
# 绘图，关闭坐标轴和注释
plot(img, ann = FALSE, axes = FALSE)

方法2：直接使用EBImage plot方法的专属参数

EBImage的plot函数自带margin和frame参数，直接设置这两个参数可以更精准消除边距：

library(EBImage)
img <- load.image("solidblack.png")
# 关闭边框、设置边距为0，同时关闭坐标轴和注释
plot(img, ann = FALSE, axes = FALSE, frame = FALSE, margin = 0)

方法3：用grid包精准控制图片布局

如果前两种方法仍有问题，使用grid包的grid.raster可以完全铺满绘图区域：

library(EBImage)
library(grid)
img <- load.image("solidblack.png")
# 新建空白绘图页
grid.newpage()
# 清除全局边距
par(mar = c(0, 0, 0, 0), mai = c(0, 0, 0, 0))
# 将图片铺满整个绘图视口
grid.raster(img, width = unit(1, "npc"), height = unit(1, "npc"))

额外注意 #

• 检查图片本身：如果PNG/JPEG图片自身带有空白边距，无论怎么设置绘图参数都无法消除，需要先处理图片。
• 匹配窗口比例：RStudio绘图窗口的比例要和图片比例一致，否则图片会保持原比例，导致出现空白区域，可调整窗口大小或设置图片显示比例。

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