R语言绘制韦恩图（2）

上次介绍了ggVennDiagram包绘制韦恩图，这次记录下ggvenn来绘制韦恩图。

#安装
devtools::install_github("yanlinlin82/ggvenn") 
#读入数据
df <- read.csv("test_venn.csv",header=TRUE)
#构建列表
x<-list(`BL`=df$BL,
        `RB`=df$RB,
        `RL`=df$RL)
#画图
ggvenn(x)

初始Venn图

当然这个看起来很一般，普通的配色加普通的线条。所以让我们来加工一下。

ggvenn(x, show_percentage = F,
       stroke_color = "white",
       fill_color = c("royalblue1","purple1","#ffb2b2"),
       set_name_color = c("royalblue1","purple1","#ff0000"))

调整后的Venn图