Figured it out!

foo <- <a gt_tbl object>

library(ggplot2)
library(ggplotify)
library(rsvg) #required to render SVG cells

foo_1 <- as_gtable(foo)
foo_2 <- as.ggplot(foo_1)
ggsave('path/to/file.png', foo_2)