在R中绘制颜色向量

我有R中的颜色向量：

"#88FF00" "#54FF00" "#FFFF00" "#13FF00" "#50FF00" "#87FF00" "#FDFB02" "#B8FF00" "#6DFF00" 
"#ECFF00" "#CBFF00" "#EDFF00" "#39FF00" "#B7FF00" "#75FF00" "#65FF00" "#C2FF00" "#25FF00" 
"#9AFF00" "#E6FF00" "#58FF00" "#E5CA1A" "#DEFF00" "#9AFF00" "#21FF00" "#35FF00" "#3AFF00" 
"#D0912F" "#FF0000" "#F7EF08" "#40FF00" "#DA7325" "#D8B027" "#DAFF00" "#55FF00" "#F8F007"
"#46FF00" "#69FF00" "#B8FF00" "#37FF00" "#32FF00" "#60FF00" "#7CFF00" "#00FF00" "#50FF00" 
"#F3E60C" "#DFBE20" "#7FFF00" "#F7EF08" "#99FF00" "#13FF00" "#DA7325" "#13FF00"

我想按这个顺序画，比如热图。我一直在玩弄图像函数，但是颜色被重新排序，甚至被图像函数修改

当cols是上面提到的颜色向量时，我尝试的代码如下：

  image(1:nrow(expressionOrdered), 1:ncol(expressionOrdered), as.matrix(expressionOrdered), col= cols,xlab="",ylab="")

---

一堆长方形怎么样

COL = c("#88FF00", "#54FF00", "#FFFF00", "#13FF00", 
"#50FF00", "#87FF00", "#FDFB02", "#B8FF00", "#6DFF00", 
"#ECFF00", "#CBFF00", "#EDFF00", "#39FF00", "#B7FF00", 
"#75FF00", "#65FF00", "#C2FF00", "#25FF00", "#9AFF00", 
"#E6FF00", "#58FF00", "#E5CA1A", "#DEFF00", "#9AFF00", 
"#21FF00", "#35FF00", "#3AFF00", "#D0912F", "#FF0000", 
"#F7EF08", "#40FF00", "#DA7325", "#D8B027", "#DAFF00", 
"#55FF00", "#F8F007", "#46FF00", "#69FF00", "#B8FF00", 
"#37FF00", "#32FF00", "#60FF00", "#7CFF00", "#00FF00", 
"#50FF00", "#F3E60C", "#DFBE20", "#7FFF00", "#F7EF08", 
"#99FF00", "#13FF00", "#DA7325", "#13FF00")

plot(NULL, xlim=c(0,length(COL)), ylim=c(0,1), 
    xlab="", ylab="", xaxt="n", yaxt="n")
rect(0:(length(COL)-1), 0, 1:length(COL), 1, col=COL)

还有另一种方法：

plot(seq_len(length(COL)), rep_len(1, length(COL)),
     col = COL, pch = 16, cex = 3, xaxt = 'n', yaxt = 'n', xlab = '', ylab = '')

来自@G5W的颜色向量

---

对于简单的情况，也可以这样做：

col_pal <- c("#2b8cbe","#de2d26", "#fc9272", "#fee0d2" , "#edf8b1" ,"#636363" )
plot(1:length(col_pal), 1:length(col_pal), col = col_pal, cex = 5, pch=19)

---

col\u pal试着给出一个你用来绘制这些颜色的代码示例，并以
c（“88FF00”、“54FF00”、“FFFF00”）的形式提供颜色，…）
这样其他人就更容易看到你迄今为止所做的尝试并着手解决你的问题。谢谢你的想法！这很完美，也很简单。
col_pal <- c("#2b8cbe","#de2d26", "#fc9272", "#fee0d2" , "#edf8b1" ,"#636363" )
plot(1:length(col_pal), 1:length(col_pal), col = col_pal, cex = 5, pch=19)