r - 如何在 ggplot 图中嵌入图像并控制边距？

Question

假设我们已经收集了一些过程的数据，其中我们的数据框中的观察发生在沿对象的连续距离处。我将在data下面模拟这个：

set.seed(123)
data <- data.frame(distance = 1:1000, var1 = rnorm (1000, mean = 2, sd = 0.1)) 

我们可以ggplot用来制作以下情节：

library(tidyverse)
ggplot(data, aes(x=distance, y = var1))+
  geom_point()+
  geom_line()+
  ylim(c(1, 10))

我们也有一张从其中收集数据的对象的图片。我在 PowerPoint 中制作了这个随机图像，我们将假设它是对象：

我将此图像作为 .jpg 保存到本地桌面并将其命名为 Example.jpg

假设该图像中的两个红点表示测量开始和结束的位置（即distance == 1和distance == 1000）。我们想将此图像插入到我们在数据上方创建的图形中，并且我们希望将这两个点与图中的第一个和最后一个观察值对齐。有没有直观的方法来实现这一点？

标签： rimageggplot2data-visualization