R语言绘图学习教程VennDiagram绘制venn

 更新时间:2022年06月24日 09:27:50   作者:小白菜学生信  
这篇文章主要为大家介绍了R语言绘图学习教程VennDiagram绘制venn的示例详解,有需要的朋友可以借鉴参考下,希望能够有所帮助,祝大家多多进步,早日升职加薪

导读

使用VennDiagram函数包中的venn.diagram函数绘制三数据集venn图。

安装依赖包:

# venn图
install.packages("VennDiagram")
library(VennDiagram)

一、模拟输入

产生3个含200字符串的数据集

set1 <- paste(rep("word_" , 200) , sample(c(1:1000) , 200 , replace=F) , sep="")
set2 <- paste(rep("word_" , 200) , sample(c(1:1000) , 200 , replace=F) , sep="")
set3 <- paste(rep("word_" , 200) , sample(c(1:1000) , 200 , replace=F) , sep="")
set4 <- paste(rep("word_" , 200) , sample(c(1:1000) , 200 , replace=F) , sep="")
set5 <- paste(rep("word_" , 200) , sample(c(1:1000) , 200 , replace=F) , sep="")

sample(x, size, replace=F) # 不放回抽样

二、venn基础图

1 两个圈

venn.diagram(
  x = list(set1, set2),
  category.names = c("Set 1" , "Set 2 "),
  filename = 'venn.png',
  output=TRUE
)

2 三个圈

venn.diagram(
  x = list(set1, set2, set3),
  category.names = c("Set 1" , "Set 2 " , "Set 3"),
  filename = 'venn.png',
  output=TRUE
)


3 四个圈

venn.diagram(
  x = list(set1, set2, set3, set4),
  category.names = c("Set 1" , "Set 2 " , "Set 3", "Set 4"),
  filename = 'venn.png',
  output=TRUE
)

4 五个圈

venn.diagram(
  x = list(set1, set2, set3, set4, set5),
  category.names = c("Set 1" , "Set 2 " , "Set 3", "Set 4", "Set 5"),
  filename = 'venn.png',
  output=TRUE
)

三、个性化参数调整

library(RColorBrewer)
color <- brewer.pal(3, "Set3")
# Chart
venn.diagram(
        x = list(set1, set2, set3),
        category.names = c("Set 1" , "Set 2 " , "Set 3"),
        filename = 'venn2.png',
        output=TRUE,
        # 输出
        imagetype="png" ,  # 类型(tiff png svg)
        #height = 1000 ,   # 高度
        #width = 1000 ,   # 宽度
        resolution = 400,  # 分辨率
        compression = "lzw",  # 压缩算法
        # 圈
        lwd = 5,  # 圈线条粗细 1 2 3 4 5
        lty = 1,  # 线条类型, 1 实线, 2 虚线, blank 无线条
        fill = color,  # 填充色
        col = c("red", 'green', 'blue'),  # 线条色
        # 数字 number
        cex = 2,  # 数字大小
        fontface = "bold",  # 加粗
        fontfamily = "sans",  # 字体
        # 标签 category
        cat.cex = 2,  # 字体大小
        cat.col = c("red", 'green', 'blue'),  # 字体色
        cat.fontface = "bold",  # 加粗
        cat.default.pos = "outer",  # 位置, outer 内 text 外
        cat.pos = c(-27, 27, 135),  # 位置,用圆的度数
        cat.dist = c(0.055, 0.055, 0.085),  # 位置,离圆的距离
        cat.fontfamily = "sans",  # 字体
        rotation = 1  # 1 2 3 旋转确定大打头数据集
)

四、保存

1 绘图待保存

library(RColorBrewer)
p = venn.diagram(
  x = list(set1, set2, set3, set4, set5),
  category.names = c("Set 1" , "Set 2 " , "Set 3", "Set 4", "Set 5"),
  # filename = 'venn.png',
  filename = NULL,
  output=TRUE,
  fill = brewer.pal(5, "Set2"),
  col = brewer.pal(5, "Set3"),
  fontface = "bold",
  cat.col = brewer.pal(5, "Set3"),
  cat.fontface = "bold"
)

2 保存为PDF

pdf("venn-pdf.pdf")
grid.draw(p)
dev.off()

3 保存为PNG

png("venn-png.png")
grid.draw(p)
dev.off()

更多参数:

col = NA  # 边框设为无色

参考:https://www.r-graph-gallery.com/14-venn-diagramm.html

venn网页工具:http://bioinformatics.psb.ugent.be/webtools/Venn/v

enn.diagram函数文档: https://www.rdocumentation.org/packages/VennDiagram/versions/1.6.20/topics/venn.diagram

The R Graph Gallery绘图教程:https://www.r-graph-gallery.com/index.html

以上就是R语言绘图学习教程VennDiagram绘制venn的详细内容,更多关于R语言VennDiagram绘制venn的资料请关注得牛网其它相关文章!

相关文章

  • R语言中的因子类型详解

    R语言中的因子类型详解

    这篇文章主要介绍了R语言中的因子类型详解,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-04-04
  • R语言 解决无法打开链结的问题

    R语言 解决无法打开链结的问题

    这篇文章主要介绍了R语言 解决无法打开链结的问题,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-04-04
  • R语言数据框中的负索引介绍

    R语言数据框中的负索引介绍

    这篇文章主要介绍了R语言数据框中的负索引介绍,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-04-04
  • R语言dplyr包之高效数据处理函数(filter、group_by、mutate、summarise)详解

    R语言dplyr包之高效数据处理函数(filter、group_by、mutate、summarise)详解

    这篇文章主要介绍了R语言dplyr包之高效数据处理函数(filter、group_by、mutate、summarise)的相关知识,本文给大家介绍的非常详细,对大家的学习或工作具有一定的参考借鉴价值,需要的朋友可以参考下
    2021-03-03
  • R语言 实现list类型数据转换

    R语言 实现list类型数据转换

    这篇文章主要介绍了R语言 实现list类型数据转换,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-03-03
  • R语言 实现将1对多数据与1对1数据互换

    R语言 实现将1对多数据与1对1数据互换

    这篇文章主要介绍了R语言 实现将1对多数据与1对1数据互换的操作,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-03-03
  • R语言-实现按日期分组求皮尔森相关系数矩阵

    R语言-实现按日期分组求皮尔森相关系数矩阵

    这篇文章主要介绍了R语言-实现按日期分组求皮尔森相关系数矩阵,具有很好的参考价值,希望对大家有所帮助。一起跟随小编过来看看吧
    2021-04-04
  • R语言对CSV文件操作实例讲解

    R语言对CSV文件操作实例讲解

    在本篇文章里小编给大家整理了一篇关于R语言对CSV文件操作实例讲解内容,有兴趣的朋友们可以学习下。
    2021-04-04
  • R语言实现ggplot重绘天猫双十一销售额曲线图过程

    R语言实现ggplot重绘天猫双十一销售额曲线图过程

    这篇文章主要为大家介绍了如何使用ggplot绘制天猫双十一销售额曲线图的实现过程,有需要的朋友可以借鉴参考下,希望能够有所帮助,祝大家多多进步,早日升职加薪
    2021-11-11
  • R语言实现漂亮的ROC图效果

    R语言实现漂亮的ROC图效果

    pROC是一个专门用来计算和绘制ROC曲线的R包,目前已被CRAN收录,因此安装也非常简单,同时该包也兼容ggplot2函数绘图,本次就教大家怎么用pROC来快速画出ROC图,感兴趣的朋友一起看看吧
    2022-06-06

最新评论