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

Question

我有两组数据需要绘制在同一张图上。一组非常大（~ 10⁶），我想用 hexbin 绘制，另一组非常小（~ 10），我想绘制点。如何在 hexbin 上绘制点？我离成功越近的是：

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

感谢任何帮助:)

Answer 1

您可以使用 ggplot 包完成该任务，请参阅下面的代码，只需将 geom_point 的数据参数中使用的 data.frame 替换为您要绘制的点的参数。

library(ggplot2)
library(hexbin)
ggplot(diamonds, aes(carat, price)) + stat_binhex() + geom_point(data = diamonds[c(1,10,100,1000), ], aes(carat, price), size=10, color = 'red' )

Answer 2

假设您使用的是 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()

Answer 3

试试这个……它应该可以正常工作。只需在 hexbinplot 函数中创建一个 panel.function：

hexbinplot(d.frame$X ~ d.frame$Y
   ,aspect=...,cex.title=...
   ,panel=function(x, y, ...){
      panel.hexbinplot(x,y,...)
   #   panel.curve(...)        # optional stuff
   #   panel.text(...)         # optional stuff
      panel.points(x=c(25,50),y=c(100,150),pch=20,cex=3.2)
   }
)

例如：How to add points to multi-panel Lattice graphics bwplot?

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

How to plot points on hexbin graph in R?

plot

r

scatter-plot

points