使用R生成热图

我需要帮助，我必须制作热图。我在R中使用下面的命令来生成一个矩阵，但是它返回了一个错误，我无法理解它。 你能告诉我怎么了吗

还请建议我如何生成热图

mat <- matrix(c(100,49.3,45.71,54.29,97.22,68.57,49.3,100,22.54,26.76,50.7,
                33.8,45.71,22.54,100,84.21,44.44,66.67,54.29,26.76,84.21,100,
                52.78,79.17,97.22,50.7,44.44,52.78,100,66.67,68.57,33.8,
                66.67,79.17,66.67,100), nrow = 6, ncol = 6, byrow = TRUE, 
              dimnames = list(c(""A_1HJO","B_2L1W","C_1MHS",
                                "D_1HQY","E_1XU4","F_1JNB""),
              c(("A_1HJO","B_2L1W","C_1MHS","D_1HQY","E_1XU4","F_1JNB"))))

Error: unexpected symbol in "49.3,45.71,54.29,97.22,68.57,49.3,100,22.54,
26.76,50.7,33.8,45.71,22.54,100,84.21,44.44,66.67,54.29,26.76,84.21,100,
52.78,79.17,97.22,50.7,44.44,52.78,100,66.67,68.57,33.8,66.67,79.17,66.67,10"

---

mat使用此选项创建矩阵：

mat <- matrix(c(100,49.3,45.71,54.29,97.22,68.57,49.3,100,22.54,26.76,50.7,
                33.8,45.71,22.54,100,84.21,44.44,66.67,54.29,26.76,84.21,100,
                52.78,79.17,97.22,50.7,44.44,52.78,100,66.67,68.57,33.8,
                66.67,79.17,66.67,100), nrow = 6, ncol = 6, byrow = TRUE, 
              dimnames = list(c("A_1HJO","B_2L1W","C_1MHS",
                                "D_1HQY","E_1XU4","F_1JNB"),
                              c("A_1HJO","B_2L1W","C_1MHS","D_1HQY","E_1XU4","F_1JNB")))

生产这个。这就是你的想法吗

是因为您的名字列表中有额外的引号吗？另外，你能使用正确的英语语法和标点符号，以及SO的标记选项吗？否则，人们很难阅读。我们不应该为你修改打字错误，对吗？是吗<代码>列表（c）（“A_1HJO”

为什么两个

”

和更高版本的

c（（“A_1HJO”），为什么两个
（
library(ggplot2)
library(reshape2)
gg=melt(mat)
ggplot(gg, aes(x=Var1,y=Var2,fill=value))+
  geom_tile()+
  scale_fill_gradient(low="#ffffaa",high="#cc0000")