Fatal编程技术网
  • r/
  • 在R中创建热图

在R中创建热图

r

在R中创建热图,r,R,我有以下矩阵想要在R中创建热图 E1 E2 P1 P2 E1 1 0.73867 0.865486 0.708944 E2 1 0.749623 0.949532 P1 1 0.747194 P2 1 我使用以下代码来实现它 acc<-read.csv("data.csv",header=TRUE,sep=",") row.names(acc)<-acc[,1] acc <- acc[,

我有以下矩阵想要在R中创建热图

    E1  E2  P1   P2
E1  1   0.73867 0.865486 0.708944
E2      1   0.749623 0.949532
P1          1    0.747194
P2              1
我使用以下代码来实现它

acc<-read.csv("data.csv",header=TRUE,sep=",")

row.names(acc)<-acc[,1]

acc <- acc[,2:dim(acc)[2]]

acc_matrix<-data.matrix(acc)

acc_map <- heatmap_2(acc_matrix,Rowv=NA, Colv=NA, col = rev(heat.colors(256)),scale="none",legend=1)
谁能帮我解决这个问题

谢谢

NI

这里有一个使用函数的解决方案

mat <- matrix(NA,ncol=4,nrow=4)
diag(mat) <- 1
library(gdata)
upperTriangle(mat) <- runif(6)
colnames(mat) <- rownames(mat) <- c("E1","E2","P1","P2")
ggheat(mat)
heapmap_2位于哪个包中？在哪个包之后发生了行错误？什么是热图2？错误发生后，您还可以使用
traceback（）
查看有关错误的详细信息。此外，粘贴
dput（acc）
的结果也会很有帮助。 
mat <- matrix(NA,ncol=4,nrow=4)
diag(mat) <- 1
library(gdata)
upperTriangle(mat) <- runif(6)
colnames(mat) <- rownames(mat) <- c("E1","E2","P1","P2")
ggheat(mat)