Here are a couple more possibilities:

plot(0, 0, main = expression(italic(X)[1]^bold(scriptscriptstyle("/"))))
plot(0, 0, main =
expression(italic(X)[1]^bolditalic(scriptscriptstyle("/"))))

The latter increases the angle a tad.

HTH,
Dennis

On Wed, Apr 6, 2011 at 3:49 PM, Peter Ehlers <ehlers@ucalgary.ca> wrote:

> On 2011-04-06 15:21, Marius Hofert wrote:
>
>> Haha, I found a hack (using the letter "l"):
>>
>> plot(0,0,main=expression(italic(X)[1]^bolditalic("l")))
>>
>
> To my eye, this is a bit neater:
>
>  expression(italic(X)[1]^bold("/"))
>
> Peter
>
>
>
>> Cheers,
>>
>> Marius
>>
>
> ______________________________________________
> R-help@r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help
> PLEASE do read the posting guide
> http://www.R-project.org/posting-guide.html
> and provide commented, minimal, self-contained, reproducible code.
>

	[[alternative HTML version deleted]]

