r - 在ggplot2中获取像素位置

Question

我正在尝试为 ggplot2 生成的 PNG 生成 html 图像映射。例如：

d <- data.frame(x=0:3, y=c(2,1,5,3), s=c('foo','bar','hello','world'))
p <- ggplot(d, aes(x,y)) + geom_point()
ggsave('img.png', p, width=4, height=4, unit='in', dpi=100)

在此示例中，第一个点 (0,2) 大致位于像素 (65,258) 处，半径约为 6 像素，因此我希望我的 R 脚本生成的地图如下所示：

<img src="img.png" usemap="#mymap" />
<map name="mymap">
  <area shape="circle" coords="65,258,6" href="foo.htm" alt="Foo" />
  ...
</map>

获取像素坐标的最佳方法是什么？正如在回答其他问题时提到的，ggplot2 使用与基本图形不同的坐标系（网格），因此 grconvertX/Y 不起作用。