如何制作文本可选中的ggplot图形？

要让ggplot图形保存后文本可被选中、搜索，核心是确保文本以矢量文本形式存储，而非被转换为路径或栅格化。以下是具体解决方案：

1. 用Cairo设备保存EPS文件 #

ggsave默认的EPS设备可能会将文本转成路径，导致无法选中。改用cairo_ps()设备可以保留可编辑的矢量文本：

library(ggplot2)
# 示例图形
p <- ggplot(mtcars, aes(mpg, wt)) + 
  geom_point() + 
  labs(title = "可搜索的标题", x = "百公里油耗", y = "车重")

# 使用cairo_ps保存EPS
cairo_ps(filename = "editable_plot.eps", family = "Arial")
print(p)
dev.off()

family参数指定系统已安装的字体（如Arial、Times New Roman），确保字体以矢量形式嵌入。

2. 优先保存为PDF格式 #

PDF原生支持可编辑文本，兼容性更好，大多数报告工具（如LaTeX、Word）都能直接嵌入并搜索文本：

# 默认PDF设备保存
ggsave("editable_plot.pdf", plot = p, device = "pdf")

# 若默认设备仍有问题，改用Cairo PDF设备
ggsave("editable_plot_cairo.pdf", plot = p, device = cairo_pdf)

3. 关键注意事项 #

• 避免使用会强制栅格化的图形元素（如geom_raster()），这类元素会被转成位图，但文本部分仍可保留矢量属性；
• 不要给矢量图设置dpi参数（仅对像素图有效），避免意外触发栅格化；
• 确保使用的字体是系统已安装的标准矢量字体，特殊字体可能被自动转成路径。

内容的提问来源于stack exchange，提问作者Muller I.