pheatmap封装不同值相同颜色

问题描述 投票:0回答:1

我尝试在 R 上制作热图,并在我的 excel 文件中有四个值(1,2,3,4),如下所示

数据 Allgemein 方法 埃尔格布尼斯 讨论 安德烈
1 4 3 2 4 4
2 4 3 2 4 4
3 4 3 2 4 4
4 4 3 2 4 4
5 2 3 2 4 4
6 4 2 3 4 4
7 4 2 2 4 4
8 4 2 1 4 4

我在“Methode”类别中有不同的值(五乘以 3 和三乘以 2),但它仍然只为其中之一提供了不同的颜色:

pheatmap(df_num,
         main = "Einhaltung von Items der CHEERS 2022 Checkliste nach Kategorien",
         col=brewer.pal(4,"Greens"),
         breaks = seq(1,4),
         fontsize = 12, 
         cluster_rows=F,
         cluster_cols=F,
         cellwidth=20,
         cellheight=20,
         border_color="black", 
         legend_breaks = 1:4, 
         legend_labels = c("100 % erfüllt",
                           "zwischen > 75% und < 100% der Items", 
                           "zwischen >50% und ≤75% der Punkte", 
                           "≤50% der Punkte"))```

r heatmap pheatmap
1个回答
0
投票

使用您的代码,我可以正确地可视化您的数据矩阵。

library(pheatmap)
library(RColorBrewer)

# Load data
df_num <- read.table(text="
data Allgemein Methode Ergebnisse Diskussion Andere
1 4 3 2 4 4
2 4 3 2 4 4
3 4 3 2 4 4
4 4 3 2 4 4
5 2 3 2 4 4
6 4 2 3 4 4
7 4 2 2 4 4
8 4 2 1 4 4", header=T, sep=" ")

# Delete the first column; it is only a raw counter
df_num <- df_num[,-1]

pheatmap(df_num,
         main = "Einhaltung von Items der CHEERS 2022 Checkliste nach Kategorien",
         col=brewer.pal(4,"Greens"),
         breaks = seq(1,4),
         fontsize = 12, 
         cluster_rows=F,
         cluster_cols=F,
         cellwidth=20,
         cellheight=20,
         border_color="black", 
         legend_breaks = 1:4, 
         legend_labels = c("100 % erfüllt",
                           "zwischen > 75% und < 100% der Items", 
                           "zwischen >50% und ≤75% der Punkte", 
                           "≤50% der Punkte"))

© www.soinside.com 2019 - 2024. All rights reserved.