Fetching Outer Dimensions to Draw a Bounding Box from an Irregular Polygon Grob in R Using Grid