Align two line legend title to the left with expression()

Question

Using this script

df <- data.frame(x = 1:5, y = 1:5, color = letters[1:5])
ggplot(df, aes(x, y, fill = color)) +
  geom_point(size = 4, pch = 21) + 
  guides(fill = guide_legend(
     title = expression(atop(Median~Nitrate-Nitrogen~(NO[3]^{textstyle("-")}-N), ".\n Concentration"~(mg~L^{textstyle("-")})))))

I got this figure

Any suggestions how to align the second line of the legend title to the left?

Possible duplicate of http://stackoverflow.com/questions/13223846/ggplot2-two-line-label-with-expression — akrun, Feb 10 '17 at 08:43
`theme(legend.title.align = 0)` seems only to have effect on "normal" two line legend titles but not with expression. — Uwe, Feb 10 '17 at 08:58

score 7 · Accepted Answer · answered Feb 10 '17 at 09:09

7

quick and ugly answer but it does the job until someone post better...

ggplot(df, aes(x, y, fill = color)) +
  geom_point(size = 4, pch = 21) + 
  guides(fill = guide_legend(
    title = expression(atop(Median~Nitrate-Nitrogen~(NO[3]^{textstyle("-")}-N), "Concentration"~(mg~L^{textstyle("-")})~phantom (1000000)~phantom (1000000)))))

answered Feb 10 '17 at 09:09

Kitty

86
3

Thanks for your time and help – shiny Feb 11 '17 at 10:52

Align two line legend title to the left with expression()

1 Answers1

Linked