Привет, есть несколько способов конвертировать базовые графики 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 )