R語言學(xué)習(xí)VennDiagram包繪制韋恩圖示例

第R語言學(xué)習(xí)VennDiagram包繪制韋恩圖示例目錄引言一需要安裝和導(dǎo)入的包二使用函數(shù)及參數(shù)三知道各個數(shù)據(jù)集的個數(shù)以及重疊（交叉）的個數(shù)2.1兩個已知數(shù)據(jù)集的韋恩圖2.2三個已知數(shù)據(jù)集的韋恩圖四根據(jù)數(shù)據(jù)集合繪制韋恩圖4.1四個數(shù)據(jù)集合4.2五個數(shù)據(jù)集合

引言

本版塊會持續(xù)分享一些常用的結(jié)果展示的圖形。

在得到數(shù)據(jù)之后，我們經(jīng)常會用到維恩圖來展示各個數(shù)據(jù)集之間的重疊關(guān)系。本文簡單的介紹R語言中的VennDiagram包繪制數(shù)據(jù)集的維恩圖。

一需要安裝和導(dǎo)入的包

install.packages("VennDiagram")

library(grid)

library(VennDiagram)

二使用函數(shù)及參數(shù)

所有參數(shù)說明點擊下載

可以看到參數(shù)有很多，不用擔心，下文的例子會給出常用的調(diào)整參數(shù)以及說明。

三知道各個數(shù)據(jù)集的個數(shù)以及重疊（交叉）的個數(shù)

2.1兩個已知數(shù)據(jù)集的韋恩圖

#圓的大小不會根據(jù)數(shù)據(jù)量多少改變

venn.plot-draw.pairwise.venn(80,30,10,c("First","Second"),scaled=FALSE)

grid.draw(venn.plot)

venn.plot-draw.pairwise.venn(80,30,10,c(First,Second))

grid.draw(venn.plot)

venn.plot-draw.pairwise.venn(area1=80,#區(qū)域1的數(shù)

area2=30,#區(qū)域2的數(shù)

cross.area=2,#重疊的個數(shù)

category=c("First","Second"),#分類命名

fill=c("blue","red"),#12區(qū)域分別的填充顏色

lty="blank",#12區(qū)域的邊框線類型

cex=2,#12區(qū)域內(nèi)部數(shù)字的字體大小

cat.cex=2,#分類名稱的字體大小

cat.dist=0.09,#分類名稱距離邊的距離實際調(diào)整

cat.just=list(c(-1,-1),c(1,1)),#分類名稱的位置，圈內(nèi)或者圈外

ext.pos=30,#線的角度默認是正上方12點位置

ext.dist=-0.05,#外部線的距離跟根據(jù)圓圈的大小適當調(diào)整

ext.length=0.85,#外部線長度

ext.line.lwd=2,#外部線的寬度

ext.line.lty="dashed")#外部線為虛線);

grid.draw(venn.plot)

2.2三個已知數(shù)據(jù)集的韋恩圖

venn.plot-draw.triple.venn(area1=80,area2=70,area3=50,n12=38,n23=18,n13=28,n123=8,category=c("First","Second","Third"),fill=c("blue","red","green"),lty="blank",cex=2,cat.cex=2,cat.col=c("blue","red","green"))

grid.draw(venn.plot)

四根據(jù)數(shù)據(jù)集合繪制韋恩圖

4.1四個數(shù)據(jù)集合

A-sample(1:1000,500,replace=FALSE);

B-sample(1:1000,600,replace=FALSE);

C-sample(1:1000,700,replace=FALSE);

D-sample(1:1000,800,replace=FALSE);

E-sample(1:1000,900,replace=FALSE);

venn.plot-venn.diagram(#數(shù)據(jù)列表

x=list(A=A,B=B,C=C,D=D),

filename="Venn_4set.tiff",#保存路徑

col="transparent",#指定圖形的圓周邊緣顏色transparent透明

fill=c("blue","green","yellow","grey50"),#填充顏色

alpha=0.50,#透明度

label.col=c("orange","white","grey50","white","white","white","white","white","darkblue","white","white","white","white","darkgreen","white"),

cex=1.2,#每個區(qū)域label名稱的大小

cat.col=c("darkblue","darkgreen","orange","grey50"),#分類顏色

cat.cex=1.2,#每個分類名稱大小

cat.dist=0.07,

cat.pos=0,#

cat.fontfamily="serif",#分類字體

rotation.degree=270,#旋轉(zhuǎn)角度

margin=0.2)

4.2五個數(shù)據(jù)集合

venn.plot-venn.diagram(

x=list(A=A,B=B,C=C,D=D,E=E),

filename="Venn_5set.tiff",

col="black",

fill=c("dodgerblue","goldenrod1","darkorange1","seagreen3","orchid3"),

alpha=0.50,

cat.col=c("darkblue","darkgreen","orange","grey50","purple"),

cat.cex=1.5,

cat.fontface="bold",

margin=0.05);

VennDiagram函數(shù)包最大能繪制5個數(shù)據(jù)