Plotmath:将希腊字符连接(加入)到罗马字符

Plotmath: concatenating (joining) a greek character to a roman character

我正在尝试制作一个以 'micrograms' 开头的标签,但它应该被缩写。我试过这个:

plot(1, main = expression(mu~g~Toxin/gram~Fresh~Weight))

但是它在 mu 和 g 之间有一个我不想要的间隙。我意识到我通过使用 ~ 来要求这个差距,但只是使用 mug 被呈现为这个词。而且,如果 mu 和 g 的字体在风格和大小上更相似,如果有一个技巧,那就更好了,这样它看起来更少 'cobbled together'(这可能要求太多)。

你可以试试

plot(1, main = expression(mu*g~Toxin/gram~Fresh~Weight))