circlize軟件包從0.4.10版本開始,可以使用circos.heatmap(),畫圓形熱圖,圓形熱圖不但漂亮,而且可以縮小圖片占用的面積。circos.heatmap()功能 大大簡化了環狀熱圖的創建。下面是circos.heatmap()功能的用法。
首先,我們生成一個隨機矩陣并將其隨機分為五個組。
set.seed(123)
mat1 = rbind(cbind(matrix(rnorm(50*5, mean = 1), nr = 50),
matrix(rnorm(50*5, mean = -1), nr = 50)),
cbind(matrix(rnorm(50*5, mean = -1), nr = 50),
matrix(rnorm(50*5, mean = 1), nr = 50))
)
rownames(mat1) = paste0("R", 1:100)
colnames(mat1) = paste0("C", 1:10)
mat1 = mat1[sample(100, 100), ] # randomly permute rows
split = sample(letters[1:5], 100, replace = TRUE)
split = factor(split, levels = letters[1:5])
head(mat1)
library(ComplexHeatmap)
Heatmap(mat1, row_split = split)
library(circlize) # >= 0.4.10
col_fun1 = colorRamp2(c(-2, 0, 2), c("blue", "white", "red"))
circos.heatmap(mat1, split = split, col = col_fun1)
circos.clear()
circlize更多功能:https://jokergoo.github.io/circlize_book/book/circos-heatmap.html#a-complex-example-of-circular-heatmaps
歡迎關注~