expression で特殊な文字をグラフに出力する

特殊な文字列をグラフに出力する際には，expression 関数が使える．
軸ラベルやtextの文字列として出力したい時には，例えば以下のようにする．

plot(…, xlab = expression(paste(delta^{13}, "C (‰)"))

delta はギリシャ文字のδを出す記号（大文字で書けば大文字のΔが出る）
^ は上付きの記号
{} で囲むことで複数の文字が特殊な表現になる

こうすると，以下のようなラベルが出力される．

2010-05-26 追記

上付き文字と下付き文字を続けて出力する方法も書いておく．
こんな感じ．

plot(…, xlab = expression(paste("Mean ", {D[N]}^2)))

[ ] は囲った文字が下付きになる．
{ } でひとまとまりのブロックにする

これで，以下のようなラベルが出力される．

ちなみに，

plot(…, xlab = expression(paste("Mean ", D[N]^2)))

これだと，

こうなってしまう．