r - 如何在条形图上添加渐变填充？

Question

我有数据框 (df)，列为:asdfg(字符)和 NUMERIC(数字)。

使用

ggplot(df, aes(x = asdfg, y = NUMERIC)) + geom_bar(stat = "identity", fill= "red")

我做了类似的东西:

现在我想得到像这样的条形图:

我不知道该怎么做。我试过使用 scale_colour_gradient2 但它不起作用(可能我做错了)。

Answer 1

像这样？

# generate sample data - you have this already
set.seed(1)    # for reproducible example
df <- data.frame(asdfg=unlist(strsplit("asdfg","")),NUMERIC=sample(1:5,5))

# you start here..
library(ggplot2)
ggplot(df, aes(x = asdfg, y = NUMERIC, fill=NUMERIC)) + 
  geom_bar(stat = "identity")+
  scale_fill_gradient(low="#FF8888",high="#FF0000")