HPC环境下使用ggsave保存ggplot2图像时X11连接失败求助

错误原因 #

HPC集群属于无图形界面（headless）环境，默认的PNG绘图设备依赖X11会话，而集群未提供X11支持，导致ggsave尝试启动X11相关设备失败，生成损坏的图像文件。

解决方案 #

以下几种方法均可解决问题，按优先级推荐：

方法1：显式指定无X11依赖的PNG设备 #

在ggsave中直接指定使用cairo类型的PNG设备，无需额外安装包：

data(mtcars)
library(ggplot2)
plot <- ggplot(data = mtcars) + 
  geom_point(mapping = aes(x = hp, y = mpg))
ggsave(
  filename = "/home/aubsxb003/mtcars.png",
  plot = plot,
  width = 1920,
  height = 1080,
  units = "px",
  dpi = 300,
  bg = "white",
  device = png(type = "cairo")
)

方法2：使用Cairo包的设备（需先安装） #

如果集群允许安装R包，可安装Cairo包并使用其无X11依赖的绘图设备：

# 首次运行需安装Cairo包：install.packages("Cairo")
data(mtcars)
library(ggplot2)
library(Cairo)
plot <- ggplot(data = mtcars) + 
  geom_point(mapping = aes(x = hp, y = mpg))
ggsave(
  filename = "/home/aubsxb003/mtcars.png",
  plot = plot,
  width = 1920,
  height = 1080,
  units = "px",
  dpi = 300,
  bg = "white",
  device = CairoPNG
)

方法3：全局设置默认绘图设备 #

在脚本开头设置全局默认设备为无X11依赖的类型，后续所有绘图操作都会自动使用该设备：

options(device = function(...) png(type = "cairo", ...))

data(mtcars)
library(ggplot2)
plot <- ggplot(data = mtcars) + 
  geom_point(mapping = aes(x = hp, y = mpg))
ggsave(
  filename = "/home/aubsxb003/mtcars.png",
  plot = plot,
  width = 1920,
  height = 1080,
  units = "px",
  dpi = 300,
  bg = "white"
)

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