前面給大家簡(jiǎn)單介紹過(guò)?韋恩圖印叁，以及?零代碼韋恩圖,韋恩餅圖,upset圖,導(dǎo)出交集键耕。當(dāng)然我們也可以用R代碼來(lái)繪制韋恩圖钳降，在前面的文章?韋恩圖中我們就講解了VennDiagram這個(gè)函數(shù)。這個(gè)函數(shù)有個(gè)小小的問(wèn)題妖碉，默認(rèn)情況下它會(huì)把畫出來(lái)的圖保存到tiff文件中。從這個(gè)函數(shù)的說(shuō)明文檔中就可以看到
我們可以看看默認(rèn)效果
library(VennDiagram)
venn.diagram(
x = list (
A = 1:10,
B = 6:25
),
cat.col=c("red","blue"),
fill = c("red","blue"),
filename = "venn.tiff"
)
下面是我們得到的結(jié)果
仔細(xì)看下venn.diagram這個(gè)函數(shù)的參數(shù)說(shuō)明，可以發(fā)現(xiàn)imagetype這個(gè)參數(shù)除了默認(rèn)的tiff以外瓤鼻，還可以是png或者是svg。其中tiff和svg其實(shí)是矢量圖贤重，可以滿足發(fā)表要求茬祷，png是位圖，不能放到文章中并蝗。
那么除了這里提到的幾種格式以外祭犯，我個(gè)人還是比較傾向于把圖直接畫到pdf文件中的，因?yàn)閜df是矢量圖借卧，是肯定滿足發(fā)表要求的盹憎。但是函數(shù)本身的參數(shù)無(wú)法滿足這個(gè)要求，那么我們只能借助另外的函數(shù)了
#將filename設(shè)置成NULL
#將畫出來(lái)的圖先保存到venn.plot中
venn.plot <- venn.diagram(
x = list (
A = 1:10,
B = 6:25
),
cat.col=c("red","blue"),
fill = c("red","blue"),
filename = NULL
)
#將venn.plot通過(guò)grid.draw畫到pdf文件中
pdf("venn.pdf")
grid.draw(venn.plot)
dev.off()
下面是得到的結(jié)果
