在分组的条形图中着色特定条

Question

我正在尝试绘制分组条形图。我想为＆gt; = 1的条纹着色，并将剩余的条纹留下未填充。我怎么能这样做？

这是我的代码

data = read.csv ("/home/paul/Desktop/dataset.csv")  
library(reshape2)
library(ggplot2)
df.long<-melt(data)
df.long$names <- factor(df.long$names, levels=unique(df.long$names))
ggplot(df.long,aes(x=names,y=value,fill=variable))+ labs(x = "x", y = "y" ) + ylim(0, 2)  + 
geom_bar(stat="identity",position="dodge") + 
scale_fill_hue(l=40) + 
theme(axis.text=element_text(size=14), axis.title=element_text(size=16,face="bold"))

我的数据

names   d1  d2
E1  1.30    1.27
K2  1.05    1.86
D4  0.94    1.51
E2  1.01    1.62
N1  1.17    1.47
Q3  1.22    1.51
S7  1.00    1.24
G2  0.78    0.96
H5  1.04    1.04
T1  1.04    1.14
A5  0.71    0.71
P4  1.03    1.27
Y2  1.34    0.58
V4  0.83    0.50
M3  1.02    0.53
C7  0.98    0.31

Answer 1

您可以在fill的{​​{1}}参数中指定填充条件，并为不想填充的人设置手动填充颜色为NA

aes()