On Apr 2, 2011, at 6:02 AM, Erich Neuwirth wrote:

The problem of changing the default font used fpr the windows graphics
device seems to be quite complicated.
As I wrote already

windowsFonts(myfont="Consolas")
par(family="myfont")

will make the windows graphics device use Consolas as the
defaut font for labels.

Therefore, a function call like
plot(1:10,main="Title")
will use Consolas for labeling.
It will, however, not change the default for

mosaic(UCBAdmissions)

The mosaic plot will still use the original default font
for the device, which in a standard configuration
seems to be Arial.

par(family=NULL)
will reset the current default font to the original default font,
so after this command
plot(1:10,main="Title")
will use Arial again.

The the font family used in graphics from package grid is set by
explicitly using gpar paramenter in calls to functions from that package.
gpar has default values, but there seems to be no way
of changing the default values of the gpar object.

Does anybody on the list know if there is a way of changing the default
values of gpar objects?

Make one with your desired values:

gpCon <- gpar(fontfamily="Consolas", fontsize=8)

Then pass it to the appropriate argument. I don't have a Windows device nor a copy of that font but the following changes several of the defaults on a Mac if I use "Times" instead of"Consolas".

mosaic(Titanic, main="Test of gpar",
        gp_varnames=gpCon,
        gp_labels=gpCon )

You _might_ be able to change the defaults with grid:::set.gpar() or with grid:::grid.Call("L_setGPar", list(...)) but my efforts did not succeed (unless success is measured by undesirable side-effects on one's system.) Neither of those functions is "exposed", so it would appear that their use is not recommended (or documented). I was able to change the internal values returned by get.gpar() but passing them on to mosaic() did not succeed.

--

David Winsemius, MD
West Hartford, CT

______________________________________________
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