以透明背景的 .png 格式导出绘图

Question

我尝试以透明背景的方式导出一个简单的 .png 绘图。我已经成功导出了它，但是背景仍然是白色。

模拟示例

x = c(1, 2, 3)

我尝试过这个

plot (x)

dev.copy (png,'myplot.png', bg = 'transparent')
dev.off()

而这个

plot (x, bg = 'transparent')

dev.copy (png,'myplot.png')
dev.off()

但是两者都没有起作用。

有人可以帮忙吗？

- francoiskroll

---

尝试使用以下代码：png("myplot.png", width=600, height=400, bg = "transparent"); plot(x); dev.off() - Adam Quek

它对我有效，使用plot(x, bg='transparent'); dev.copy(png, 'myplot.png', bg='transparent')。 - G5W

Answer 1

x = c(1, 2, 3)
par(bg=NA)
plot (x)

dev.copy(png,'myplot.png')
dev.off()

- gonzalez.ivan90

---

如何撤销对“par”的更改？ - Fawwaz Yusran

创建一个具有默认参数的对象：´parOrig <- par()´，并将其用作´par()´参数：´par(parOrig)´ ´parOrig <- par(); par(bg=NA, mfrow = c(2, 1)); plot (1:3); par(parOrig); plot (1:3)´ - gonzalez.ivan90

Answer 2

不要保存所有参数，最好只保存通过调用´par´更改的参数的旧值，将´par´的结果保存起来，就像修改后的示例一样:

x = c(1, 2, 3)
old.par <- par(bg=NA)
plot (x)

dev.copy(png,'myplot.png')
dev.off()
par(old.par)

- Diana Šimić