Many thanks Dr. Ripley. I was made aware that the problem for me was that I
was sending HTML in my email message. Transgression noted.

On Wed, Jun 29, 2011 at 10:17 PM, Prof Brian Ripley
<ripley@stats.ox.ac.uk>wrote:

> On Wed, 29 Jun 2011, Sam Albers wrote:
>
>  I know that this has been asked before in other variations but I just
>> can't
>> seem to figure out my particular application from previous posts. My
>> apologies if I have missed the answer to this question somewhere in the
>> archives. I have indeed looked.
>>
>> I am running Ubuntu 11.04, with R 2.12.1 and ESS+Emacs.
>>
>> For journal formatting requirements, I need to italicize all the greek
>> letters in any plot. This is reasonably straight forward to do and I
>> accomplished this task like so:
>>
>> library(ggplot2)
>>
>> label_parseall <- function(variable, value) {
>>  plyr::llply(value, function(x) parse(text = paste(x)))
>> }
>>
>> dat <- data.frame(x = runif(270, 0, 125), z = rep(LETTERS[1:3], each = 3),
>> yy = 1:9, stringsAsFactors = TRUE)
>> #unicode italicized delta
>> dat$gltr =
>> factor(c("italic(\u03b4)^14*N"**,"italic(\u03b4)^15*N","**
>> italic(\u03b4)^13*C"))
>>
>> #So this is what I want my plot to look like:
>> plt <- ggplot(data = dat, aes(x = yy, y = x)) +
>>   geom_point(aes(x= yy, y=x, shape=z, group=z), alpha=0.4,position =
>> position_dodge(width = 0.8)) +
>>   facet_grid(gltr~.,labeller= label_parseall, scales="free_y")
>> plt
>>
>> #So then I exported my plot as a PDF like so:
>> pdf("Times_regular.pdf", family='Times')
>> plt
>> dev.off()
>> #The problem with this was that the delta symbols turned into dots.
>>
>
> You forgot to set the encoding: see the ?pdf help file.  Greek is most
> likely not covered by the default encoding (and you also forgot the 'at a
> minimum' information required by the posting guide, so we don't know what
> your defaults would be).
>
>
> Here is the results of sessionInfo(). Is this what you meant by defaults?

> sessionInfo()
R version 2.12.1 (2010-12-16)
Platform: i686-pc-linux-gnu (32-bit)

locale:
 [1] LC_CTYPE=en_CA.UTF-8       LC_NUMERIC=C
 [3] LC_TIME=en_CA.UTF-8        LC_COLLATE=en_CA.UTF-8
 [5] LC_MONETARY=C              LC_MESSAGES=en_CA.UTF-8
 [7] LC_PAPER=en_CA.UTF-8       LC_NAME=C
 [9] LC_ADDRESS=C               LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_CA.UTF-8 LC_IDENTIFICATION=C

attached base packages:
[1] stats     graphics  grDevices utils     datasets  grid      methods
[8] base

other attached packages:
[1] Cairo_1.4-9   ggplot2_0.8.9 reshape_0.8.4 plyr_1.5.2    proto_0.3-9.2

loaded via a namespace (and not attached):
[1] digest_0.4.2


I also tried using all the encodings found /usr/lib/R/library/grDevices/enc

AdobeStd.enc  CP1250.enc  CP1253.enc  Cyrillic.enc  ISOLatin1.enc
 ISOLatin7.enc  KOI8-R.enc  MacRoman.enc  TeXtext.enc
AdobeSym.enc  CP1251.enc  CP1257.enc  Greek.enc     ISOLatin2.enc
 ISOLatin9.enc  KOI8-U.enc  PDFDoc.enc    WinAnsi.enc

None of these seemed to produce italicized greek letters. It seems like
encoding is ignored in CairoPDF so I never tried it with that command.




>  #I solved this problem using Cairo
>> library(Cairo)
>> cairo_pdf("Cairo.pdf")
>> plt
>> dev.off()
>>
>>
>> The problem that I face now is that I am unsure how to output a figure
>> that
>> maintains the greek symbols but outputs everything in the plot as TImes
>> New
>> Roman, another requirement of the journal. So I can produce a Times New
>> Roman PDF plot and an italicize greek symbol unicode PDF plot but not
>> both.
>> Does anoyone have any idea how I might accomplish both of these things
>> together in a single PDF?
>>
>
> I woud use cairo_pdf() in base R (and not package Cairo).  Use grid
> facilities to change font, or use the version in R-devel which has a family=
> argument.
>
> I tried this using CairoPDF() like so:

CairoPDF("Cairo.pdf", 6, 6, family="Times")
plt
dev.off()

But this omitted the greek symbols AND didn't produce the figure in the
desired font. It seems like other folks have also experienced this problem
before:

https://stat.ethz.ch/pipermail/r-help/2011-January/266657.html

Have I missed something? Are there any other strategies that could suggest
to get italicized greek letters? Thanks again.

Sam


>
>> Thanks so much in advance,
>>
>> Sam
>>
>>        [[alternative HTML version deleted]]
>>
>
>  ______________________________**________________
>> R-help@r-project.org mailing list
>> https://stat.ethz.ch/mailman/**listinfo/r-help<https://stat.ethz.ch/mailman/listinfo/r-help>
>> PLEASE do read the posting guide http://www.R-project.org/**
>> posting-guide.html <http://www.R-project.org/posting-guide.html>
>>
>
> That does mean you!
>
> --
> Brian D. Ripley,                  ripley@stats.ox.ac.uk
> Professor of Applied Statistics,  http://www.stats.ox.ac.uk/~**ripley/<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
>

	[[alternative HTML version deleted]]

