使用facet_wrap()时如何将面板标题转换为脚注

发布于05月03日

当使用facet_wrap()时，我想将图表的面板标题更改为脚注.例如，当我创建图表时，我想将标题"B/R1.1"或"B.R2.1"更改为正确的图形，仅将数字显示为脚注.你能告诉我怎么做吗？

df = data.frame(
  Genotype = c("A", "B", "A", "B"),
  Treatment = c("B/R1.1", "B/R1.1", "B/R2.1", "B/R2.1"),
  yield = c(100, 150, 88, 120)
)

ggplot(df, aes(x=Genotype, y=yield)) +
  geom_bar(stat="identity", position="dodge", width=0.9, size=1) +
  facet_wrap(~ Treatment, scales="free") +
  theme_classic(base_size=22, base_family="serif")+
  theme(axis.line=element_line(linewidth=0.5, colour="black"),
        strip.background=element_rect(color="white",
                                      linewidth=0.5,linetype="solid"))

谢谢，

推荐答案

try 以下

df = data.frame(
  Genotype = c("A", "B", "A", "B"),
  Treatment = c("B/R[1.1]", "B/R[1.1]", "B/R[2.1]", "B/R[2.1]"),
  yield = c(100, 150, 88, 120)
)

ggplot(df, aes(x=Genotype, y=yield)) +
  geom_bar(stat="identity", position="dodge", width=0.9, size=1) +
  facet_wrap(~ Treatment, scales="free", labeller = label_parsed) + # note new argument here
  theme_classic(base_size=22, base_family="serif")+
  theme(axis.line=element_line(linewidth=0.5, colour="black"),
        strip.background=element_rect(color="white",
                                      linewidth=0.5,linetype="solid"))

使用[]格式化Treatment列的后缀.然后在facet_wrap中告诉ggplot按照以下labeller = label_parsed处理标签.