介绍
热图展示参与者的属性,散点图表示样本的时间跨度。
加载R包
library(tidyverse)
library(ComplexHeatmap)
library(circlize)
library(cowplot)
导入数据
数据可从以下链接下载(画图所需要的所有数据):
-
百度云盘链接: https://pan.baidu.com/s/1iEE9seTLdrrC3WDHJytvIQ
-
提取码: yvf5
load("figure1ab.RData")
数据预处理
tumortype_order <- tmn_meta_data$dx1_tumortype %>%
table %>% sort %>% names
patient_order <- with(tmn_meta_data, setNames(dx1_tumortype, upn)) %>%
.[order(match(., tumortype_order))] %>% names
tmn_meta_data_processed <- tmn_meta_data %>%
mutate(upn = factor(upn, l
本站资源均来自互联网,仅供研究学习,禁止违法使用和商用,产生法律纠纷本站概不负责!如果侵犯了您的权益请与我们联系!
转载请注明出处: 免费源码网-免费的源码资源网站 » 科研绘图系列:R语言组合热图和散点图
发表评论 取消回复