我制作了一个300万分的情节并将其保存为PNG.花了几个小时,我想避免重新绘制所有要点.

如何生成以PNG为背景的新图?
我正试图在背景图像上绘制一些数据.问题是两个层最终都使用相同的比例.不幸的是,这是有问题的.
一个例子.
我想在这张图片上绘制一些数据.

对.所以我在ggplot中绘制它就像这样.
img <- readJPEG("image.jpg")
image <- apply(img, 1:2, function(v) rgb(v[1], v[2], v[3]))
image <- melt(image)
ggplot(image, aes(row, -column, fill=fill)) + geom_tile() + scale_fill_identity()
Run Code Online (Sandbox Code Playgroud)
它运作良好.所以,让我们在顶部添加一些数据.
df <- data.frame(x=sample(1:64, 1000, replace=T),
y=sample(1:64, 1000, replace=T))
ggplot(df, aes(x,y)) + stat_bin2d()
Run Code Online (Sandbox Code Playgroud)
绘制样本数据,我得到了这个.

所以我只想在渐变图像上分层这个数据图.
ggplot(image, aes(row, -column, fill=fill)) + geom_tile() +
scale_fill_identity() + geom_point(data=df2, aes(x=x, y=-y))
Run Code Online (Sandbox Code Playgroud)
但它最终会像这样

尝试指定第二个填充比例会引发错误.我看到这说不能做,但我希望有一个解决方法或我忽略的东西.
我有一个人体的GIF,需要在上面绘制热图.要使用的数据在R中
我已经找到了如何导入gif的说明,但它是我的数据到我不确定的gif.
我认为我需要首先将gif放在网格上,然后得到一些坐标,然后将数据分配给相关的坐标?
例如,如果头部位于(5,10),胃部位于(5,5),右侧膝盖位于(4,3)等位于网格上.
是否有人们使用这个包,或者它只是一个严格在R中编程而没有包的任务?或者你使用其他资源?