[R] footnote in postscript lattice

Gesmann, Markus Markus.Gesmann at lloyds.com
Fri Jan 27 10:01:32 CET 2006

Here is one example using the page option in xyplot:

 add.footnote <- function(string="Hello World", col="grey",
lineheight=0.5, cex=0.7){
      x=unit(1, "npc") - unit(1, "mm"),
      y=unit(1, "mm"), just=c("right", "bottom"),
      gp=gpar(col=col,lineheight=lineheight, cex=cex))
 xyplot(1~1, page=function(n){ add.footnote()})

Markus Gesmann
Lloyd's Market Analysis
Lloyd's * One Lime Street * London * EC3M 7HA
Telephone +44 (0)20 7327 6472
Facsimile +44 (0)20 7327 5718

-----Original Message-----
From: r-help-bounces at stat.math.ethz.ch
[mailto:r-help-bounces at stat.math.ethz.ch] On Behalf Of Dean Sonneborn
Sent: 26 January 2006 23:46
To: r-help at stat.math.ethz.ch
Subject: [R] footnote in postscript lattice

I would like to add a footnote to this graph but do not see a "footnote"
command in the package:lattice documentation. I would like to note the
 as the footnote.

postscript(file= "C:/Documents and Settings/dsonneborn/My
bg="transparent", onefile=FALSE, pointsize=20,paper="letter",
horizontal=TRUE, family="Helvetica",font="Helvetica")

xyplot(AWGT ~ lipid_adj_lpcb2_cent | malex*romanix, data=pcb_graph3,

       auto.key = list(lines = TRUE, points = TRUE), ylab="Birth
Weight", xlab="Lipid Adjusted PCB",

       par.settings =

       list(superpose.symbol = list(col = colr, pch = plotchar),

            superpose.line = list(col = colr, pch = plotchar, lty = 1)),

        type=c("p", "smooth"), span=.8)


Dean Sonneborn, MS
Programmer Analyst
Department of Public Health Sciences
University of California, Davis
(530) 754-9516

R-help at stat.math.ethz.ch mailing list
PLEASE do read the posting guide!

The information in this E-Mail and in any attachments is CON...{{dropped}}

More information about the R-help mailing list