饼图自定义调色板百分比

Question

我必须使用组织提供的调色板。 但是我有错误消息。

DT <- data.table(induse = c("C29", "P7","TOTAL"), values = c(570,100,600))
paletteEcoFin <- c("9A5EA6", "E5C473", "B98B50", "61276D", "2E368F","D8C5E0", "0000FF", "800080")
pie = ggplot(DT, aes(x="", y=values, fill=induse)) + geom_bar(stat="identity", width=1)
pie = pie + coord_polar("y", start=0) 
+  scale_fill_manual(values=paletteEcoFin) 

我尝试查看馅饼时出错

  Error in grDevices::col2rgb(colour, TRUE) : invalid color name 'B98B50'

此外，如何获得自动计算的百分比并显示在饼图中？ 谢谢。

Answer 1

请考虑更改paletteEcoFin向量的前三个值（即将#添加为常规十六进制颜色）：

paletteEcoFin <- c("#9A5EA6", "#E5C473", "#B98B50", "61276D", "2E368F","D8C5E0", "0000FF", "800080")

ggplot(DT, aes(x="", y=values, fill=induse)) + 
  geom_bar(stat="identity", width=1) +
  coord_polar("y", start=0) + 
  scale_fill_manual(values=paletteEcoFin)