r包调用legend函数_在Julia语言中调用R包”ComplexHeatmap“进行画图

在这里我打算复现一下ComplexHeatmap说明文件里的一个热图。R的代码如下：

res_list = readRDS("meth.rds")

type = res_list$type

mat_meth = res_list$mat_meth

mat_expr = res_list$mat_expr

direction = res_list$direction

cor_pvalue = res_list$cor_pvalue

gene_type = res_list$gene_type

anno_gene = res_list$anno_gene

dist = res_list$dist

anno_enhancer = res_list$anno_enhancer

column_tree = hclust(dist(t(mat_meth)))

column_order = column_tree$order

library(circlize)

meth_col_fun = colorRamp2(c(0, 0.5, 1), c("blue", "white", "red"))

direction_col = c("hyper" = "red", "hypo" = "blue")

expr_col_fun = colorRamp2(c(-2, 0, 2), c("green", "white", "red"))

pvalue_col_fun = colorRamp2(c