ggplot ile arka plan resmi üzerinde veri çizimi

Question

Bir arka plan görüntüsü üzerinde bazı verileri çizmeye çalışıyorum. Sorun, her iki tabakanın da aynı ölçeği kullanarak bitmesidir. Bu maalesef sorunlu.

Örnek.

Bu image üzerinden bazı verileri çizmek istiyorum.

Sağ. Ben de bunu ggplotta çiziyorum.

Ve iyi çalışıyor. Yani, üstüne biraz veri ekleyelim.

df <- data.frame(x=sample(1:64, 1000, replace=T), 
    y=sample(1:64, 1000, replace=T)) 
ggplot(df, aes(x,y)) + stat_bin2d() 

örnek verileri haritalayarak, ben this olsun.

Bu nedenle, bu veri çiziminin degrade görüntüsünün üzerinde katmanlanmasını istiyorum.

ggplot(image, aes(row, -column, fill=fill)) + geom_tile() + 
    scale_fill_identity() + geom_point(data=df2, aes(x=x, y=-y)) 

Ama ikinci bir dolgu ölçeği bir hata atar belirtmek için çalışılıyor this

gibi biter. this'un görülemez olduğunu görüyorum, ama bir geçici çözüm veya baktığım bir şey olduğunu umuyorum.

Answer 1

library(ggplot2) 
library(jpeg) 
library(grid) 

img <- readJPEG("image.jpg") 

df <- data.frame(x=sample(1:64, 1000, replace=T), 
       y=sample(1:64, 1000, replace=T)) 

ggplot(df, aes(x,y)) + 
    annotation_custom(rasterGrob(img, width=unit(1,"npc"), height=unit(1,"npc")), 
        -Inf, Inf, -Inf, Inf) + 
    stat_bin2d() + 
    scale_x_continuous(expand=c(0,0)) + 
    scale_y_continuous(expand=c(0,0))