ComplexHeatmap:增加侧边注释的标签大小？

library(ComplexHeatmap)

# 创建一个示例热图数据
mat <- matrix(rnorm(100), nrow = 10)

# 创建一个示例注释标签
row_annotation <- data.frame(label = paste0("Row", 1:10))
col_annotation <- data.frame(label = paste0("Col", 1:10))

# 创建热图对象
ht <- Heatmap(mat,
              row_annotation = row_annotation,
              column_annotation = col_annotation)

# 设置行注释标签的大小
ht_row <- rowAnnotation(ht, widths = unit(2, "cm"))
ht_row$gp$fontsize <- 12

# 设置列注释标签的大小
ht_col <- columnAnnotation(ht, widths = unit(2, "cm"))
ht_col$gp$fontsize <- 12

# 绘制热图
draw(ht_row + ht_col)