自定义图例柱状图绘制求助：无法实现目标配色与整合效果

我想要绘制一款类似期刊文章中的频率数据柱状图，该图下方需带有整合的图例样式。目前使用以下R代码：

library(ggpubr)
library(colorspace)
library(ggsci)
ggbarplot(codons, width = 0.8,
          y = "Count", Ticks = FALSE, sort.by.groups = TRUE,
          x = "Amino_acid", Color = "Count", fill = "Count",
          font.tickslab = "white",
          legend = "none", 
          xlab = NULL,ylab = NULL, 
          position = position_fill(), ggtheme = theme_void())

但目前仅能生成蓝色渐变配色的柱状图，无法实现目标图的对应配色以及图例整合效果（附当前效果截图）。

内容的提问来源于stack exchange，提问作者dex