Добавление заголовка и подзаголовка к диаграмме Venn

Question

Я пытаюсь добавить основной и подзаголовок к моей диаграмме venn, которую я создал, используя следующий код в R. Я прочитал документацию пакета R 'VennDiagram без успеха. Я также попытался использовать gird.arrange() с textGrob и графиком из полученного кода, но получил сообщение об ошибке, указывающее, что все входы должны быть grob.

require(VennDiagram) 

draw.triple.venn(
    area1 = 396, 
    area2 = 273, 
    area3 = 147, 
    n12 = 266, 
    n23 = 86, 
    n13 = 143, 
    n123 = 83, 
    category = c("Study", "Work", "Play"), 
    fill = c("blue", "red", "green"), 
    euler.d=TRUE, 
    scaled=TRUE 
) 

Answer 1

Выход этой функции является GList (и побочный эффект черчения, если вы не укажете ind=FALSE). Для того, чтобы использовать его с grid.arrange, вам нужно обернуть его в GTree,

g = draw.triple.venn(
    area1 = 396, 
    area2 = 273, 
    area3 = 147, 
    n12 = 266, 
    n23 = 86, 
    n13 = 143, 
    n123 = 83, 
    category = c("Study", "Work", "Play"), 
    fill = c("blue", "red", "green"), 
    euler.d=TRUE, 
    scaled=TRUE, ind = FALSE, 
) 

require(gridExtra) 
grid.arrange(gTree(children=g), top="Title", bottom="subtitle")