R中一列数据的热图

现在我有一列数据，超过500行

#example
df <- data.frame(
  City = c("New York", "LA", "DC", "Boston", "Chicago"),
  Data = c(780, 982, 111, 893, 989)

#示例
诀窍是用cbind复制单列并绘制

library(gplots)
df <- data.frame(
  City = c("New York", "LA", "DC", "Boston", "Chicago"),
  Data = c(780, 982, 111, 893, 989)
)

heatmap.2(cbind(df$Data, df$Data), trace="n", Colv = NA, 
          dendrogram = "row", labCol = "", labRow = df$City, cexRow = 0.75)


labRow
：为设置行标签（使用
”
表示无标签）

cellnote
：设置单元格标签（如果确实需要单元格标签，请删除此参数）

col
：设置调色板。我的建议是使用
colorspace
、
RColorBrewer
或
colorRamps
中的预定义调色板。
一些建议：

col=col=colorspace::sequential_hcl(15)
col=col=RColorBrewer::brewer.pal(9, "BuGn"
col=colorRamps::ygobb(25)

有关R
中调色板的更多信息，热图通常涉及一个量化变量，该变量按分类变量或顺序变量对进行分解。这听起来更像是你想要一个城市统计表？不，我有超过500个城市。没有重复的城市。我想我不明白。。。有500个电池，没有一个图形会好看。另外，给它们指定颜色，然后让读者看一个键，而不是仅仅列出数字，这更令人困惑……这不是我喜欢的方法，但我被告知这样做（我被告知要有一张5行的热图。每行包含100个城市。因此，每个方框将显示一个城市…这是一个巧妙的技巧，但对于如何显示此类数据来说，这似乎仍然是一个超级奇怪的选择。谢谢，这正是我要寻找的！！！！！只需几个问题，如何删除标签？以及如何更改颜色？
col=col=colorspace::sequential_hcl(15)
col=col=RColorBrewer::brewer.pal(9, "BuGn"
col=colorRamps::ygobb(25)