On 01/07/2013 09:03, David Winsemius wrote:
On Jul 1, 2013, at 12:40 AM, Prof Brian Ripley wrote:
On 01/07/2013 03:19, Emily Weiser wrote:
Hello,
I'd like to add labels to my plot that include a male or female symbol as
subscript.
I'm working in Windows Vista and R 3.0.0.
I am able to add the male symbol to the plot as regular text (NOT as
subscript), e.g. with:
mtext("Male\u2642")
This displays the word "Male" followed by the male symbol on the plot.
But "\u2642" does not work when I try to put it as a subscript.
For example,
mtext(expression("Male"["\u2217"]))
successfully adds an asterisk as a subscript after the word "Male".
However,
mtext(expression("Male"["\u2642"]))
displays the word "Male" followed by a subscript of "<U+2642>", i.e. the
symbol is not displayed.
How can I make the male symbol show as a subscript?
You cannot use non-native text with plotmath. The issue is not that you used a
subscript but that you passed an expression() call and hence invoked plotmath.
And the help does say
In non-UTF-8 locales there is normally no support for symbols not
in the languages for which the current encoding was intended.
After discovering in the documentation for ?points, ?plotmath, and ?Hershey
that Hershey fonts which do support astrologic symbols cannot be used in
plotmath expressions, my suggestion for a work-around is to use plotmath with a
phantom() call ofappropriate length in the expression and then two calls to
text with xpd=TRUE:
text( locator(1), "\\VE", vfont=c("sans serif","bold"), xpd=TRUE) # Venus
text( locator(1), "\\MA", vfont=c("sans serif","bold"), xpd=TRUE) # Mars
I suppose this might work with approapriate modifications to the positioned
parameters of that function.
Yes, you could use text() in the margin, in which case (at least on
windows()) you can use \uxxxx notation and don't need Hershey fonts. I
considered mentioning that, but the positioning is going to be really
tricky to do programatically.
Many thanks for any suggestions!
Read all of ?plotmath.
Agree with Prof Ripley. If you are a bit slow as am I, it may take 3 or 4
readings.
--
David Winsemius
Alameda, CA, USA
--
Brian D. Ripley, rip...@stats.ox.ac.uk
Professor of Applied Statistics, http://www.stats.ox.ac.uk/~ripley/
University of Oxford, Tel: +44 1865 272861 (self)
1 South Parks Road, +44 1865 272866 (PA)
Oxford OX1 3TG, UK Fax: +44 1865 272595
______________________________________________
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.
