如何绘制与指定Binary R热图样式一致的二进制数据热图？文件输入遇阻求助

我来帮你搞定这个二进制热图的绘制，顺便解决你提到的数据输入问题～下面是一步步的解决方案：

第一步：正确导入并预处理数据集 #

你提到疑似文件输入操作有误，先确保数据正确加载：

1. 先把csv文件下载到本地，然后用R的基础函数导入，记得把Strains列设为行名（这样热图的行就是菌株名称）：

# 导入数据，将第一列设为行名
data <- read.csv("Dataset.csv", row.names = 1)
# 转换为矩阵格式（热图函数通常需要矩阵输入）
data_matrix <- as.matrix(data)
# 检查数据结构，确保是二进制（1/0）格式
str(data_matrix)

如果你的数据里有非二进制的值，记得先清洗成1和0，比如用data_matrix[data_matrix != 1] <- 0（如果只有1和其他值的话）。

第二步：绘制无渐变的二进制热图 #

你想要的是没有颜色渐变、只有两种离散颜色的热图，用pheatmap包最容易实现（这个包比基础的heatmap()更灵活）：

1. 先安装并加载包：

install.packages("pheatmap")
library(pheatmap)

2. 绘制热图的核心代码：

pheatmap(
  data_matrix,
  color = c("#ffffff", "#000000"), # 白色代表0，黑色代表1，可自行替换颜色
  scale = "none", # 关键：关闭数据缩放，避免渐变
  cluster_rows = FALSE, # 不需要聚类的话设为FALSE，需要的话改TRUE
  cluster_cols = FALSE,
  show_rownames = TRUE,
  show_colnames = TRUE,
  border_color = NA, # 去掉单元格边框，更整洁
  legend = TRUE
)

关键参数说明： #

• color：指定两种离散颜色，对应二进制的0和1，你可以换成任何你喜欢的颜色组合（比如c("#f0f0f0", "#2c3e50")）
• scale = "none"：这是避免出现渐变的核心，默认的热图会对数据做缩放，导致颜色渐变，关闭后就只会用你指定的两种颜色
• cluster_rows/cluster_cols：如果不需要对菌株或基因聚类，就设为FALSE，和你给的示例子集样式一致

可能的错误排查 #

如果你之前画图失败，大概率是这几个原因：

• 没有把Strains列设为行名，导致热图行显示为数字
• 用了基础的heatmap()函数，它默认会添加颜色渐变，需要额外设置参数才能改成离散颜色
• 数据没有转换成矩阵格式，部分热图函数只接受矩阵输入

内容的提问来源于stack exchange，提问作者Devyani Samantarai