这个例子中如何修改 ggplot2 图例标题

Question

我尝试了很多建议，但都不适用于这个简单的例子。如何将图例标题更改为“样本”？

df1 <- data.frame(
  Order = c(1,1,2,2),
  Tissue = c("Bladder","Pancreas","Bladder","Pancreas"),
  Sample = c("WT","WT","Mutant","Mutant"),
  Percent = c(94.12,55,5.88,45)
)

ggplot(data = df1, aes(x = Tissue, y = Percent, group = Sample)) + 
    geom_point(aes(shape=reorder(Sample,Order), fill=reorder(Sample,Order)), size = 6) +
    scale_shape_manual(values=c(21,22)) +
    scale_fill_manual(values=c("deepskyblue1","yellow")) 

谢谢。

- jmu

Answer 1

scale_XX 接受一个可以调整的 name 参数：

scale_shape_manual(name = "Sample", values=c(21,22)) +
scale_fill_manual(name = "Sample", values=c("deepskyblue1","yellow")) 

如果你不在两个比例尺中都传递它，显然会默认创建两个单独的图例。

你可以在传递到绘图代码之前进行reorder()操作。

详见这里。

- Chase

---

哇，我真是太蠢了。我之前尝试把它放在每个刻度线上，但没有同时放。非常感谢你！ - jmu

Answer 2

另一种选择是使用 指南。

bp + guides(fill=guide_legend("Sample"),shape=guide_legend("Sample"))

- agstudy