Search code examples
rplotmath

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

I'm trying to make a label which starts out with 'micrograms' except that it should be abbreviated. I tried this:

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

but it is rendered with a gap between mu and g which I don't want. I realize I asked for that gap by using ~ but simply using mug is rendered as the word. And, it would be better if the font of the mu and the g were more similar stylistically and in size if there is a trick for that, so that it looks less 'cobbled together' (which may be asking too much).

Solution

  • You can try

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