Border always cut off in .png or .svg

Hey, thanks for this cool package. I've made a sticker but can't seem to figure out why the left side and bottom of the border are always cut off.
I've tried on a windows and mac, R version 4.0.2. (magick version 2.6.0, hexSticker 0.4.9)
Running one of the examples:

library(lattice)
counts <- c(18,17,15,20,10,20,25,13,12)
outcome <- gl(3,1,9)
treatment <- gl(3,3)
bwplot <- bwplot(counts ~ outcome | treatment, xlab=NULL, ylab=NULL, cex=.5,
                 scales=list(cex=.5), par.strip.text=list(cex=.5))

sticker(bwplot, package="hexSticker", p_size=20, s_x=1.05, s_y=.8, s_width=2, s_height=1.5,
        h_fill="#f9690e", h_color="#f39c12", filename="lattice.png")

The result is attached

Start by running the supplied R example through the sticker() entry point and compare the generated PNG and SVG output. Trace how the border dimensions are calculated and rendered; the issue is done when the complete border appears without the left or bottom edge being clipped.