本文主要是介绍R可视化:Venn图进阶版本,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
前言
最近看到一张不一样的韦恩图,添加了上下调基因数目的韦恩图,将其实现一下,用于自己的研究展示。
导入R包和数据
library(dplyr)
library(tibble)
library(ggplot2)
library(ggVennDiagram)
library(ggpubr)
library(data.table)subgrp <- c("HC", "CP", "PDAC")
grp.col <- c("#568875", "#73FAFC", "#EE853D")PDAC_HC_Batch1 <- fread("PDAC_HC_TWilcox_Batch1Run.csv")
PDAC_HC_Batch2 <- fread("PDAC_HC_TWilcox_Batch2Run.csv")
加载数据
链接: https://pan.baidu.com/s/1xezhpZRebCsct0AtlDpSHg 提取码: 2djy,Venn数据
PDAC_HC_Batch1 <- readxl::read_xlsx("./inputdata/VennDA/PDAC_HC_TWilcox_Batch1Run.xlsx", sheet = 1)
PDAC_HC_Batch2 <- readxl::read_xlsx("./inputdata/VennDA/PDAC_HC_TWilcox_Batch2Run.xlsx", sheet = 1)
构建函数
这篇关于R可视化:Venn图进阶版本的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!