From maechler@stat.math.ethz.ch  Tue Aug 13 08:37:08 2002
From: maechler@stat.math.ethz.ch (maechler@stat.math.ethz.ch)
Date: Tue, 13 Aug 2002 09:37:08 +0200 (MET DST)
Subject: interaction.plot() legend too narrow when mfcol > 2 (PR#1899)
Message-ID: <200208130737.JAA06371@pubhealth.ku.dk>

Here is an example:

 The legends (mainly the factor level names) are cut off on the
 right.  Somehow the internal calculation which computes
 horizontal space for the legend is not flexible enough.

## Call a new graphics window {with default par()s !}:
get(getOption("device"))()
par(mfrow = c(2,2))

## part of  example(interaction.plot)  _improved_ using with() :
data(OrchardSprays)
with(OrchardSprays, {
    interaction.plot(treatment, rowpos, decrease)
    interaction.plot(rowpos, treatment, decrease)
})

data(esoph)
with(esoph, {
    interaction.plot(agegp, alcgp, ncases/ncontrols)
    interaction.plot(agegp, tobgp, ncases/ncontrols, trace.label="tobacco",
                     fixed=TRUE)
})

-------------------------------

Something that should be easy to fix, but needs some care (and
time). 
Volunteers?

Martin Maechler <maechler@stat.math.ethz.ch>	http://stat.ethz.ch/~maechler/
Seminar fuer Statistik, ETH-Zentrum  LEO C16	Leonhardstr. 27
ETH (Federal Inst. Technology)	8092 Zurich	SWITZERLAND
phone: x-41-1-632-3408		fax: ...-1228			<><


-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._


interaction.plot() legend too narrow when mfcol > 2 (PR#1899)
maechler@stat.math.ethz.ch