获取ggplot2 grob的“npc”坐标

Question

用于在R语言中生成图形的网格包使用所谓的“普通父坐标”（npc）来定位图形对象（“grobs”）。 是否可以获得ggplot2 grob的npc坐标？ 这对于在整个方面绘制线条（用于连接数据点）有很大的帮助（ggplot, drawing line between points across facets包含一个解决方案，但对于初学者来说这很难遵循）

library(ggplot2)
library(grid)

# Generate some sample data
df <- data.frame(y=c(1,2,3),x=1,Set=LETTERS[1:3])

# Plot
ggplot(df,aes(x,y)) + 
  geom_point(aes(fill=Set),color="black",shape=21,size=3) + 
  facet_grid(~Set)

# It is easy to list the grobs, but I can't see their npc coordinates
grid.ls(grid.force())