Hi, this seems to work, plot.new() legend("topleft", legend=as.expression(c(bquote(.(txt) == .(obv)*degree), "Von Mises distribution"))) HTH, baptiste On 28 December 2010 20:17, Tyler Dean Rudolph <tylerdeanrudolph at gmail.com> wrote: > legend("topleft", legend=c(bquote(.(txt) == .(obv)*degree), "Von Mises > distribution"))