下面给出了生成附加热图的代码。我正在寻找增加表示注解行的垂直条的宽度的方法。HEre is a link to sample image from the code.
pheatmap(TermFoldCh,
color = inferno(11),
breaks = breaksList,
border_color = "black",
cluster_rows = mat_cluster_rows,
cluster_cols = mat_cluster_cols,
#clustering_distance_rows = "euclidean",
#clustering_distance_cols = "euclidean",
legend = TRUE,
legend.breaks = breaksList,
legend.labels = c("-10", "-8", "-6", "-4", "-2", "0", "2", "4", "6", "8", "10"),
annotation_row = row_ann,
annotation_col = col_ann,
annotation_legend = TRUE,
annotation_names_row = TRUE,
annotation_names_col = TRUE,
annotation_colors = annotation_colors,
drop_levels = FALSE,
show_rownames = TRUE,
show_colnames = TRUE,
main = t,
fontsize = 3)