R ggplot叠加矩阵和散点图

我想画一个连续值的矩阵，然后在正方形的子集中画点。理想情况下，每个正方形内的点应足够小，以便在背景中仍能看到正方形的颜色。示例代码：

ex <- matrix( c(1,2,3,2,3,4,3,4,5),nrow=3)
p <- ggplot(melt(ex), aes(x=Var1,y=Var2, fill=value)) + geom_raster()
x <- c(1,3)
y <- c(2,3)
pts <- cbind(x,y)
p <- p + ...?

---

ex我不太清楚你想画什么。也许一个模拟的情节会有所帮助

除此之外，你可以这样做

ex <- matrix( c(1,2,3,2,3,4,3,4,5),nrow=3)

# Wide to long
df <- data.frame(ex) %>%
    rowid_to_column("y") %>%
    gather(x, value, -y) %>%
    mutate(x = sub("X", "", x))

# Plot
ggplot(df, aes(x, y)) +
    geom_tile(aes(fill = value)) +
    geom_point(data = subset(df, x %in% c(1, 3) & y %in% c(2, 3)), size = 3)

ex%
聚集（x，值，-y）%>%
变异（x=sub（“x”，x，x））
#密谋
ggplot（df，aes（x，y））+
geom_瓷砖（aes（填充=值））+
几何点（数据=子集（df，x%在%c（1,3）中，y%在%c（2,3））中，大小=3）

这正是我想要的。谢谢很高兴帮助@MarkBower。