R 如何在ggplot2中缩放背景图像？

我的屏幕尺寸为15.6英寸。我已经拍摄了屏幕截图。我正在做一个项目，我必须绘制鼠标点击点的散点图。所以我有鼠标点击点的坐标。我想在这张图像上绘制散点图，散点图是鼠标点击点的屏幕上的点。那么什么时候我正在使用ggplot2绘图并添加背景图像。它缩放图像，分散点位于实际单击鼠标的不同位置

p4 <- ggplot(subset(ClickData,type1=="singleClick"), aes(ms,x=x,y=-y)) + background_image(b)+
  geom_point(alpha=1,color='red') +
  # geom_smooth(alpha=.2, size=1) +
  ggtitle("Single click")+
  theme(legend.position="none")  
p4

---

它的纵横比是变化的，它所显示的点不是实际发生点击的地方

应设置绘图的坐标系以匹配图像的尺寸

ggplot(ClickData, aes(x, y  = dim(b)[1] - y)) + 
        background_image(b) +
        geom_point(color='red', size=5) +
        coord_cartesian(xlim = c(0, dim(b)[2]), ylim = c(0, dim(b)[1]), 
                        expand = FALSE)

---

一个很好的解释是，你理解我的问题了吗？请添加一些数据，使这个问题重现。您可以将屏幕截图添加为问题中的图像，并使用dput提供一些鼠标坐标Yes sure@dww查看我的编辑！！非常感谢你能回答我之前的问题吗

x,y,type
1341,278,singleLeftClick
1194,320,singleLeftClick
1233,555,singleLeftClick
1111,586,singleLeftClick
1160,587,singleLeftClick

ggplot(ClickData, aes(x, y  = dim(b)[1] - y)) + 
        background_image(b) +
        geom_point(color='red', size=5) +
        coord_cartesian(xlim = c(0, dim(b)[2]), ylim = c(0, dim(b)[1]), 
                        expand = FALSE)