Michael,
How about using grayscale shading and setting the background color (the gaps
between the tiles) to middle gray?
--
Alan B. Cobo-Lewis, Ph.D. (207) 581-3840 tel
Department of Psychology(207) 581-6128 fax
University of Maine
Orono, ME 04469-5742[EMAIL PROTECTED]
http://www.umaine.edu/visualperception
r-help@stat.math.ethz.ch on Saturday, January 28, 2006 at 6:00 AM -0500 wrote:
Content-Type: message/rfc822
MIME-Version: 1.0
From: Mike Townsley [EMAIL PROTECTED]
Precedence: list
MIME-Version: 1.0
To: r-help@stat.math.ethz.ch
Date: Fri, 27 Jan 2006 11:28:10 +
Message-ID: [EMAIL PROTECTED]
Content-Type: text/plain; charset=us-ascii; format=flowed
Subject: [R] monochrome mosaic plot in vcd package
Message: 5
helpeRs,
I have a nice looking mosaic plot in an article to be published
soon. Sadly, the published version will be in black and white and so ruin
the advantage of the default shading scheme of tiles.
What would readers suggest as an alternative shading scheme? If I have a
black-and-white shading scheme graduated according to suitable cutoffs I
won't be able to tell positive from negative residuals. The tile borders
can be changed of course, but I'm uncertain that is will be clear enough
for a reader.
Another option may be to use a fill pattern of sloping lines with different
orientations for the sign and density for the magnitude. The problem with
this option is I wouldn't know where to start to incorporate into a legend.
The shading_binary function is no good as I would like the cells with
residuals less than absolute 2 to be different from other cells. How would
readers of this list represent a mosaic plot so that it was easily
interpretable in monochrome?
My data can be used as an example:
library(vcd)
library(MASS)
term.1 - gl(2,1,8, labels = LETTERS[1:2])
term.2 - gl(2,2,8, labels = LETTERS[3:4])
term.3 - gl(2,4,8, labels = LETTERS[5:6])
cell.count - c(72, 19, 5, 8, 117, 115, 81, 85)
mosaic(loglm(formula = cell.count ~ term.1 + term.2 + term.3),
shade = TRUE, gp = shading_hcl, legend = TRUE,
labeling_args = list(rot_labels = rep(0,4)),
gp_args = list(lty = 1:2),legend_width = unit(0.2, npc))
Dr Michael Townsley
Senior Research Fellow
Jill Dando Institute of Crime Science
University College London
Second Floor, Brook House
London, WC1E 7HN
Phone: 020 7679 0820
Fax: 020 7679 0828
Email: [EMAIL PROTECTED]
__
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
