Re: [R] footnote in postscript lattice

From: Gesmann, Markus <Markus.Gesmann_at_lloyds.com>
Date: Fri 27 Jan 2006 - 20:01:32 EST


Here is one example using the page option in xyplot:

library(lattice)
library(grid)
 add.footnote <- function(string="Hello World", col="grey", lineheight=0.5, cex=0.7){

       grid.text(string,
      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
FPMA
Lloyd's Market Analysis
Lloyd's * One Lime Street * London * EC3M 7HA Telephone +44 (0)20 7327 6472
Facsimile +44 (0)20 7327 5718
http://www.lloyds.com

-----Original Message-----
From: r-help-bounces@stat.math.ethz.ch
[mailto:r-help-bounces@stat.math.ethz.ch] On Behalf Of Dean Sonneborn Sent: 26 January 2006 23:46
To: r-help@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 "span=.8"
 as the footnote.

postscript(file= "C:/Documents and Settings/dsonneborn/My Documents/Slovak/output/pcb_tables/smooth_PCB_lines_four.ps", 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)

dev.off()
thanks

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


______________________________________________
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 ************LNSCNTMCS01*************************************************** The information in this E-Mail and in any attachments is CON...{{dropped}}
______________________________________________
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
Received on Fri Jan 27 20:14:02 2006

This archive was generated by hypermail 2.1.8 : Sat 28 Jan 2006 - 02:13:47 EST