The issue here is not trellis.device.

You are using lattice plots (without mentioning lattice), which are based on package 'grid' and so using the grid sub-system of a device. That sub-system does not use the 'pointsize' of the device as its initial font size. So you need to use

grid::gpar(fontsize = 28)

If I call that after opening the device I get what I guess you expected.


On 09/06/2014 07:54, Patrick Connolly wrote:
How is the pointsize set in trellis.devices?

From my reading of the trellis.device help file, I understood that the
pointsize arg would be referenced to the call to the pdf function.

So I set up a trellis pdf device as so:

   trellis.device(device = pdf, file = "Singers.pdf", height = 160/25.4,
                  width = 160/25.4, pointsize = 28)

A base R graphics plot works as I'd expected.

   plot(1:10, 50:59) # silly plot with huge plotting characters and letters

However, pointsize is ignored in trellis plots;

   pik <- bwplot(voice.part ~ height, data = singer)# pointsize ignored
   print(pik)
   dev.off()

There are many trellis cex-type settings, but FWIU they're all
relative to the default size.  My question is: How do I set that
default?


R version 3.0.2 (2013-09-25)
Platform: i686-pc-linux-gnu (32-bit)

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

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

other attached packages:
[1] RColorBrewer_1.0-5 lattice_0.20-24

loaded via a namespace (and not attached):
[1] grid_3.0.2  plyr_1.8    tools_3.0.2

I've tried with R-3.1.0 on another machine so I don't think the
problem is with an old version.

I doubt it has much to do with pdf specifically.  Attempts to use png,
bitmap, postscript devices all produce equivalent results.



(Here's all the example code uninterrupted:)

   trellis.device(device = pdf, file = "Singers.pdf", height = 160/25.4,
                  width = 160/25.4, pointsize = 28)
   plot(1:10, 50:59) # silly plot with huge plotting characters and letters
   pik <- bwplot(voice.part ~ height, data = singer)# pointsize ignored
   print(pik)
   dev.off()


TIA




--
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.

Reply via email to