ggplot2中的背景图片覆盖整个画布？

Question

正在寻找一种解决方案，如图所示。

我第一次尝试

pic_import <- png::readPNG("background.png")
pic_raster <- grid::rasterGrob(pic_import, interpolate = TRUE)

插入ggplot：

background_image(pic_raster)+

或代替：

annotation_custom(pic_raster, -Inf, Inf, -Inf, Inf)

两种方法均无效。我对此不知所措。

如何加载覆盖整个画布的图像？

thx