高质量png而不改变R中的多重打印外观？

为了从绘图生成高质量的

png

文件，我通常增加

png（）

的

res=

参数的值。但是在下面的例子中，我有一个复杂的7x4绘图平台，更改

res=

会改变绘图的实际外观（例如，绘图框看起来更厚等等）

我想知道如何在保持原始外观（如图形设备所示）的同时提高以下绘图的质量

p.S:我只是想实现一个高质量的版本，我在我的图形设备中看到的

png("Plot.png")

par(mfcol = c(7, 4), mar = rep(.1, 4), oma = rep(7, 4)) 
invisible(lapply(1:28, plot, t = "n", xaxt = "n", yaxt = "n"))

dev.off()

---

根据您要完成的任务，还可以在png中增加宽度和高度参数。随着分辨率的增加，如果增加宽度和高度，相对布局将保持不变，但最终会得到更多像素，因此对于给定的物理尺寸，分辨率将更高。

这看起来更好吗

png("Plot.png", res = 600, width = 8, height = 7, units = "in")
par(mai = c(0.5,0.5,0.5,0.5))
par(mfcol = c(7, 4), mar = rep(.1, 4), oma = rep(7, 4)) 
invisible(lapply(1:28, function(x){
    plot(rnorm(20), rnorm(20), axes = FALSE, col = sample(1:7, 1), ann = FALSE)
    box()
    }))
dev.off()