如何在R中的热图中显示图例？

热图是数据的图形表示，其中每个数据值都用颜色值表示。热图是使用 R 中的 heatmap()函数创建的。与直方图关联的图例可以很容易地理解颜色值的含义。使用 R 中的 legend()函数以直方图显示图例。

使用的函数

• R 语言中的heatmap()函数用于绘制热图。热图被定义为数据的图形表示，使用颜色来可视化矩阵的值。

Syntax: heatmap(data)

Parameters:
data: It represent matrix data, such as values of rows and columns

Return: This function draws a heatmap

• R 语言中的legend()函数用于向现有 Plot 添加图例。图例被定义为描述图的每个部分的图的一个区域。图例图用于以图形形式显示统计数据。

Syntax:
legend(x, y, legend, fill, col, bg, lty, cex, title, text.font, bg)

Parameters:
x and y: These are co-ordinates to be used to position the legend
legend: Text of the legend
fill: Colors to use for filling the boxes with legend text
col: Colors of lines
bg: It defines background color for the legend box.
title: Legend title (optional)
text.font: An integer specifying the font style of the legend (optional)

Returns: Legend plot

方法

• 创建数据矩阵
• 使用 heatmap() 方法绘制热图
• 提供具有相应值的适当属性
• 使用 legend() 方法将图例与热图关联
• 运行代码以显示绘图

示例 1：

R

# Create data matrix
A <- matrix(rnorm(25, 0, 5), nrow = 5, ncol = 5)  
print(A)
  
# Plot a heatmap 
heatmap(A,Rowv=NA,Colv=NA,col=heat.colors(3))
  
# Plot a corresponding legend
legend(x="right", legend=c("min", "med", "max"),fill=heat.colors(3))

输出：

示例 2：

电阻

# Import library for color
library(RColorBrewer)
  
# Create data matrix
A = matrix(
  c(1,2,0,3,4,0,2,1,3,3,0,0,4,
    4,1,4,3,1,4,3,0,2,1,1,4),
  nrow = 5, ncol = 5)        
  
# Plot a heatmap
heatmap(A, Rowv = NA, Colv = NA, 
        col = colorRampPalette(brewer.pal(8,"Blues"))(3))
  
# Plot a legend in bottom right part of heatmap
legend(x = "bottomright", legend = c("low", "medium", "high"),
       cex = 0.8, fill = colorRampPalette(brewer.pal(8, "Blues"))(3))

输出：