[Rd] R CMD check and postscript fonts

[Prof Brian Ripley]

On Thu, 24 Jan 2008, Johannes Graumann wrote:

> Prof Brian Ripley <ripley <at> stats.ox.ac.uk> writes:
>
>>
>> On Thu, 24 Jan 2008, Johannes Graumann wrote:
>>
>>> Hello,
>>> I came across this by using R cmd check - otherwise I would probably not have
>>> noticed.
>>> One of my functions does something like this:
>>> # postscript()
>>> # plot(1, xlim = c(0, 10), ylim = c(0, 4), type = "n", ann = FALSE, axes =
> FALSE)
>>> # text(1:10, 2, c("a","b"), cex = seqcex, family="mono",font=2)
>>>
>>> Which results in the error:
>>> Error in text.default(1:10, 2, c("a", "b"), cex = seqcex, family = "mono",  :
>>>  family 'mono' not included in PostScript device
>>>
>>> 'mono' is perfectly fine for my x11 device and
>>> # postscriptFonts()$mono
>>>
>>> gives me:
>>> $family
>>> [1] "Courier"
>>>
>>> $metrics
>>> [1] "Courier.afm"             "Courier-Bold.afm"
>>> [3] "Courier-Oblique.afm"     "Courier-BoldOblique.afm"
>>> [5] "Symbol.afm"
>>>
>>> $encoding
>>> [1] "default"
>>>
>>> attr(,"class")
>>> [1] "Type1Font"
>>>
>>> That looks all right to me no? How to remedy this?
>>
>> Use the 'fonts' argument to postscript():
>>
> Hmmm, my actual function contains this bit ... any idea on how to solve this as
> generic as possible? I do not want to make this require or prevent postscript as
> the dev, but make the test (postscript) pass and enable future use of postscript
> ... where to put the 'fonts' unobtrusively, so that other devs will still work?

It is device-specific.

>
> Joh
>
> vectorsequence <- c("A","B")
> xreq <- length(vectorsequence)
>
> par(mar=c(1, 1, 1, 1) + 0.1)
> plot(1, xlim = c(0, xreq), ylim = c(0, 4), type = "n", ann = FALSE, axes = FALSE)
> text(1:xreq, 2, vectorsequence, cex = 2.5, family="mono",font=2)
>
> ______________________________________________
> R-devel at r-project.org mailing list
> https://stat.ethz.ch/mailman/listinfo/r-devel
>

-- 
Brian D. Ripley,                  ripley at 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