Р: Как отобразить элементы, а не просто количество, в каждом круге диаграммы Венна?

Например, установите A={a,b,c} и установите B={b,c,d}, а пересечение множеств A и B должно быть {b,c}. Но как я могу отобразить {b,c} вместо числа 2 на диаграмме Венна? Я пробовал venn в пакете limma и Venn в пакете Vennerable, но ни один из них не работает. Спасибо.


venn-diagram
person gipelttil    schedule 11.08.2011    source источник

Ответы (1)


arrow_upward
3
arrow_downward

В Vennerable это возможно с помощью параметра FaceText="elements", хотя его документация неполная. Используя пример со страницы 10 Venn.pdf (доступен после установки пакета):

setList <- strsplit(month.name, split = "")
names(setList) <- month.name
Vmonth3 <- VennFromSets(setList[1:3])
plot(Vmonth3,doWeights=FALSE,show=list(FaceText="elements"))

Также можно управлять внешним видом элементов. Например, этот код устанавливает размер шрифта равным 10:

gp <- VennThemes(compute.Venn(Vmonth3))
gp$FaceText <- lapply(gp$FaceText,function(x) {x$fontsize<-10; return(x)})
plot(Vmonth3,doWeights=FALSE,show=list(FaceText="elements"),gp=gp)
person dpmcna    schedule 02.12.2012