r - ggplot2 barplot 用渐变颜色填充一个或几个条形图

Question

我使用 ggplot 制作了一个条形图，并用一些随机颜色填充了条形图，但似乎我无法用渐变颜色填充特定条形（例如从绿色到蓝色）。

我目前的代码是

x1<-c('A','B','C','B','A','A','B','A','C','A','A','B','C')

x2<-c('G1','G1','G1','G2','G3','G3','G4','G4','G5','G6','G6','G6','G7')

x3<-c(2,3,3.5,4,6,5,5.4,3,4.1,2.5,.2,1.7,1.9)

x4<-c('a','b','a','b','a','b','a','a','b','a','b','b','b')

Data<-cbind(x1,x2,x3,x4)

Data<-data.frame(Data)

ggplot(data=Data, aes(x=x2, y=x3, fill=x1, color=x4)) +
  geom_bar(stat="identity", width=0.6, position=position_dodge())+ 
  coord_flip() +
  scale_fill_manual(values=c('red','red','green','purple'))

生成附加图。我正在尝试用色标填充绿色条，例如从绿色到蓝色。我不需要更改其他条的颜色。

任何帮助表示赞赏。

标签： rggplot2bar-chartgradient