饼图自定义调色板百分比

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)

饼图自定义调色板百分比

Pie chart custom color palette percent

r

palette

ggplot2

pie-chart