有谁会不喜欢漂亮的热图呢?今天介绍一个非常好用的R包{tidyheatmaps}[1]!首先,安装并载入R包:install.packages("tidyheatmaps")library(tidyheatmaps)# 下方仅为载入代码,需要提取安装library(scales) library(dplyr)这次使用{tidyheatmaps}中的数据data_exprs,为data frame格式的长数据。为了方便作图,简化一下数据。提取其中的5个变量,以及变量external_gene_name中的8个基因,存入新数据mydata:mydata % select("external_gene_name", "sample", "expression", "group", "direction") %>% # 提取5个变量 filter(external_gene_name %in% c("Apol6", "Col5a3", "Ankrd54", "Bag1", # 提取8个基因 "Kif1a", "Pttg1", "Sh3tc1", "Smim10l2a"))summary(mydata); head(mydata)关于长宽数据之间的转换可以查看之前的内容:实用!这几个函数让长宽数据的转换变得无比丝滑~开始作图,使用函数tidyheatmap():t
………………………………