R 在ggplot2中添加镶嵌面标题和更改图例标题

我想知道如何在ggplot2中添加方面标题

ggplot(diamonds, aes(cut)) + geom_bar() +   facet_grid(color ~ clarity)

并更改图例标题

ggplot(diamonds, aes(cut, fill=cut)) + geom_bar() +   facet_grid(. ~ clarity)

---

感谢您的帮助。

面使用所用因子的级别进行标记。因此，如果您只需更改级别，例如

levels(diamonds$clarity) <- letters[1:8]

另外，我注意到我可以在

labs

中将

x

和

y

轴标签设置为空，但不能设置图例标题；对于那些你不想要标题的人，你可以使用一个空字符

编辑

根据您的说明，您可以使用

grid.text

：

print(qplot(1,1),vp = viewport(width = 0.9))
grid.text(unit(0.95,"npc"),0.5,label = "Right label", rot = 270)

---

谢谢您的回复。+实验室（fill=“fill legend label”）工作正常。对于方面标题，我想为类别添加一些标题而不是标签。@MYaseen208在这种情况下，我不知道您的意思。在ggplot2中，每个刻面的顶部（或侧面）都有一个条带，用作该刻面的某种标题。你的意思是你想用一些文字注释每个方面吗？在这种情况下，将文本放在数据框中，并使用

geom_text

将其添加为一个层。感谢您抽出时间帮助我。在我的第一个代码中，颜色有七个级别（D、E、F、G、H、I、J），这些级别显示在右侧。除此之外，我还想以与xlab相同的方式放置一些刻面标题，如“钻石的颜色”。对不起，我没能解释清楚。@MYaseen208我想我现在已经回答了你的问题，我希望。不过，对于您的特定情节，您必须稍微调整一下定位。@MYaseen208可能不会。但是我认为如果你使用A.9中提到的技术，你可以让它工作。

print(qplot(1,1),vp = viewport(width = 0.9))
grid.text(unit(0.95,"npc"),0.5,label = "Right label", rot = 270)