R语言添加.png扩展名时png函数无法正常工作的问题求助

代码示例 #

尝试保存PNG格式的代码：

p <- ggplot(mtcars)+
  geom_point(aes(x = hp, y = mpg))

png(filename = 'filename.png')
p
dev.off()

无扩展名可正常运行的代码：

p <- ggplot(mtcars)+
  geom_point(aes(x = hp, y = mpg))

png(filename = 'filename')
p
dev.off()

报错信息 #

带扩展名运行时触发错误：

Error in png(filename = "filename.png") : 
  não é possível iniciar dispositivo png()
In addition: Warning messages:
1: In png(filename = "filename.png") :
  unable to open file 'filename.png' for writing
2: In png(filename = "filename.png") : opening device failed

png()、jpeg()、ggsave()均出现相同错误。

已排查操作 #

• 清空工作区、重启电脑、更换多个文件夹，仅无扩展名或SVG格式可保存
• SVG格式可正常生成；给无扩展名文件重命名加.png提示“访问被拒绝”，加.svg则正常

解决方案 #

1. 排查系统安全软件拦截
   特定扩展名被拦截大概率是杀毒软件、防火墙或系统文件保护机制在阻止文件创建。暂时关闭实时防护后重试，确认是否是安全软件导致。

2. 使用绝对路径保存
   避免相对路径的权限问题，直接指定完整绝对路径：

   # Windows示例
   ggsave("C:/Users/你的用户名/Documents/plot.png", plot = p)
   # macOS/Linux示例
   ggsave("/home/你的用户名/Documents/plot.png", plot = p)
   

   也可以用file.path生成跨平台路径：

   save_path <- file.path(Sys.getenv("HOME"), "Documents", "plot.png")
   ggsave(save_path, plot = p)
   

3. 更换PNG设备后端
   指定cairo类型的PNG设备，兼容性更强：

   png(filename = "filename.png", type = "cairo")
   print(p)
   dev.off()
   

   注意显式用print(p)，避免非交互式环境下的渲染问题。

4. 确认文件夹完整写入权限
   右键目标文件夹→属性→安全，确保当前用户拥有完全控制或至少写入权限，不要仅依赖“管理员权限”运行R，直接给文件夹分配权限更可靠。

5. 重装PNG相关依赖包
   若R的PNG库损坏，重装png包：

   install.packages("png", dependencies = TRUE)
   

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