Identify the edges of the paper of each page
paper_shape(data)
data
data.frame created by ggpage_build.
data.frame,
paper_shape(ggpage_build(tinderbox))