如何在ggplot轴的两个字符串之间放置bquote上标

Question

我想在ggplot y轴上获取此字符串Linear Prediction of Protein (mg/ gm^-1 per kg)。我尝试了以下语法，但无法获得所需的结果。我在这里想念什么？

p + ylab(bquote('Linear Prediction of Protein\n (mg/' ~gm^-1 'per kg soil'))

Answer 1

这是您可以用来分割文本行的版本

 + ylab(expression(atop("Linear Prediction of Protein", paste("(mg/g", m^-1, ") per kg soil"))))