[R] plots: layout + subtitles

2006-10-16 Thread Marie-Pierre Sylvestre
Hello,

I want to create a figure that consists of a collection of 16 graphs on 
4 rows.  I am using

nf - layout(matrix(seq(1,16), 4,4, byrow=TRUE), respect=TRUE)
boxplot(...

to create the layout of my 16 graphs. It works really well. However, I'd 
like to add sub-titles that would apply to each row of 4 graphs. More 
specifically, I'd like to have something like:

subtitle 1 (centered)
graph 1 graph 2 graph 3 graph 4
subtitle 2 (centered)
graph 5 graph 6 graph 7 graph 8
subtitle 3 (centered)
graph 9 graph 10 graph 11 graph 12
subtitle 4 (centered)
graph 13 graph 14 graph 15 graph 16

in the same figure, to be saved as a ps file.

Can somebody help?
I hope this question is not redundant, but I have not found information 
on this on the R mailing lists.

I use R 2.3.1 on Linux FC5.

Thank you in advance.

Marie-Pierre Sylvestre
PhD student, McGill University

__
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
and provide commented, minimal, self-contained, reproducible code.


Re: [R] plots: layout + subtitles

2006-10-16 Thread Paul Murrell
Hi


Marie-Pierre Sylvestre wrote:
 Hello,
 
 I want to create a figure that consists of a collection of 16 graphs on 
 4 rows.  I am using
 
 nf - layout(matrix(seq(1,16), 4,4, byrow=TRUE), respect=TRUE)
 boxplot(...
 
 to create the layout of my 16 graphs. It works really well. However, I'd 
 like to add sub-titles that would apply to each row of 4 graphs. More 
 specifically, I'd like to have something like:
 
 subtitle 1 (centered)
 graph 1 graph 2 graph 3 graph 4
 subtitle 2 (centered)
 graph 5 graph 6 graph 7 graph 8
 subtitle 3 (centered)
 graph 9 graph 10 graph 11 graph 12
 subtitle 4 (centered)
 graph 13 graph 14 graph 15 graph 16
 
 in the same figure, to be saved as a ps file.


How about ...

lmat - rbind(c(0, 17, 17, 0),
  1:4,
  c(0, 18, 18, 0),
  5:8,
  c(0, 19, 19, 0),
  9:12,
  c(0, 20, 20, 0),
  13:16)

layout(lmat, respect=TRUE, widths=rep(5, 4), heights=rep(c(1, 5), 4))

# layout.show(20)

opar - par(cex=0.5, mar=c(4, 4, 1, 1))
for (i in 1:16)
plot(i)

par(mar=rep(0, 4))
for (i in 1:4) {
plot.new()
text(0.5, 0.5, paste(Sub-title, i))
}

par(opar)


 Can somebody help?
 I hope this question is not redundant, but I have not found information 
 on this on the R mailing lists.
 
 I use R 2.3.1 on Linux FC5.
 
 Thank you in advance.
 
 Marie-Pierre Sylvestre
 PhD student, McGill University
 
 __
 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
 and provide commented, minimal, self-contained, reproducible code.

-- 
Dr Paul Murrell
Department of Statistics
The University of Auckland
Private Bag 92019
Auckland
New Zealand
64 9 3737599 x85392
[EMAIL PROTECTED]
http://www.stat.auckland.ac.nz/~paul/

__
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
and provide commented, minimal, self-contained, reproducible code.