可以展示结果,但是为了paper,还需要一些调整!...function(x, y, w, h) {
grid.rect(x, y, w-unit(0.5, "mm"), h-unit(0.5, "mm"),
gp = gpar(fill...alter_fun, col = col,
column_title = column_title,
remove_empty_columns = TRUE, #去掉空列...ha, #注释信息在底部
alter_fun = alter_fun, col = col, remove_empty_columns = TRUE, #去掉空列...= sample_order,
remove_empty_columns = TRUE, #去掉空列
remove_empty_rows = TRUE