Преобразовать диаграмму Венна в гроб?

Привет, есть несколько способов преобразовать базовые графики R в объект grob, однако я не могу получить диаграммы Венна из пакета VennDiagram для этого. Я попробовал два разных метода, но оба не помогли. Есть идеи? Спасибо!

library ( VennDiagram )
library(ggplotify)
library(gridGraphics)

venn.plot <- draw.pairwise.venn(
    area1 = 100,
    area2 = 70,
    cross.area = 30,
    category = c("First", "Second"),
    cat.pos = c(0, 180),
    euler.d = TRUE,
    sep.dist = 0.03,
    rotation.degree = 45
);




grab_grob <- function(){
    grid.echo()
    grid.grab()
}

grid.draw(venn.plot )
g <- grab_grob()
p1 <- as.grob( venn.plot )