R 更改多色分组条形图中轮廓的颜色

这是我的柱状图：

如何为每个条设置黑色轮廓，以及如何更改轴标签的字体大小和标签上的值

mm1=melt(data[,c('label','cut_scorer1','cut_scorer2')], id = 1)
assign(cut_score,ggplot(mm1, aes(x = label, y = value, width = 0.8)) + 
    geom_bar(aes(fill = variable), stat = "identity", position = "dodge")+ sale_fill_manual(values=alpha(c('light green','dark green'),0.7), name = "Scorer", 
    labels = c("1", "2")) + 
    labs(title = paste(subject_name,"Cutting", sep = " - "), x = "", y = 
    "Score") + 
    theme(text = element_text(size = 15)) + coord_cartesian( ylim = 
    c(min(mm1$value),max(mm1$value))))

---

我真的建议您看看geom_bar的文档以及基本的ggplot2文档，但这可能会帮助您开始学习

可以使用color=black向条形图添加轮廓，也可以使用labs更改轴标签。我们使用主题中的参数来更改轴标签和记号上的字体大小。请参阅下面的代码：

# example dataframe
df <- data.frame(time = factor(c("Lunch","Dinner"), levels=c("Lunch","Dinner")),
                 total_bill = c(14.89, 17.23))

plot <- ggplot(data = df, aes(x = time, y = total_bill, fill = time)) +
        geom_bar(colour = "black", stat = "identity") +
        labs(x = "Meal", y = "Total Bill") +
        theme(axis.title.x = element_text(size = 13, face = "bold"),
              axis.title.y = element_text(size = 13, face = "bold"),
              axis.text.x = element_text(size = 12),
              axis.text.y = element_text(size = 12))
print(plot)

---

我找到了解决办法，谢谢

我在geom_条内添加了颜色=黑色，但在aes外添加了颜色=黑色

mm1=meltdata[，c'label'，'cut_score1'，'cut_score2'，id=1 分配切割分数，ggplotmm1，aesx=标签，y=值，宽度=0.8+ geom_baraesfill=变量，stat=身份，颜色=黑色，位置=道奇+ 比例\颜色\手动值=‘黑色’+ 刻度填充手动值=字母C“浅绿色”，“深绿色”，0.7，名称=记分器，标签=c1，2+ labstitle=pastesubject_名称，切割，sep=-，x=，y=分数+

---

themetext=element\u textsize=15+coord\u cartesian ylim=cminmm1$value，maxmm1$value

在寻求帮助时，您应该包括一个简单的示例输入和所需的输出，可用于测试和验证可能的解决方案。此问题的可能重复并不是上述问题的重复，由于该方法专门用于堆叠条形图，因此需要使用cut的替代方法。cut不适用于成组图