Align hai dòng truyền thuyết tiêu đề bên trái với biểu thức()

Question

Sử dụng kịch bản này

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("-")}))))) 

Tôi có con số này

Bất kỳ lời đề nghị làm thế nào để sắp xếp dòng thứ hai của danh hiệu huyền thoại Qua bên trái?

Answer 1

câu trả lời nhanh và xấu xí nhưng nó không được công việc cho đến khi một người nào đó gửi tốt hơn ...

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)))))