如何在R中的hexbin图上绘制点？

Question

我有两组需要在同一图表上绘制的数据.一个集非常大(~10⁶),我想用hexbin绘图,另一个集非常小(~10),我想绘制点.如何在hexbin上绘制点？我得到的成功更接近于此:

bin = hexbin(x, y)
plot(bin)
pushViewport(dataViewport(x, y))
grid.points(x, y)

我感谢任何帮助:)

Answer 1

假设您正在使用该hexbin包...

library(hexbin)
library(grid)

# some data from the ?hexbin help
set.seed(101)
x <- rnorm(10000)
y <- rnorm(10000)
z <- w <- -3:3

# hexbin
bin <- hexbin(x, y)

# plot  - look at str(p)
p <- plot(bin)

# push plot viewport
pushHexport(p$plot.vp)

# add points
grid.points(z, w, pch=16, gp=gpar(col="red"))

upViewport()