使用这个脚本
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("-")})))))
我得到了这个数字
有什么建议如何将图例标题的第二行向左对齐？
最佳答案
快速而丑陋的答案，但是它可以完成工作，直到有人发布更好的内容为止。
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)))))
关于r - 将左两行图例标题与expression()对齐，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/42154922/