Re: [R] footnote in postscript lattice
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: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] 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
[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
Re: [R] footnote in postscript lattice
After you create your xyplot use library(grid) panel.text(grid.locator(),label=My label) Cheers Francisco PS: How is good ol' David these days? From: Dean Sonneborn [EMAIL PROTECTED] To: r-help@stat.math.ethz.ch Subject: [R] footnote in postscript lattice Date: Thu, 26 Jan 2006 15:46:28 -0800 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 __ 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
Re: [R] footnote in postscript lattice
On 1/26/06, Francisco J. Zagmutt [EMAIL PROTECTED] wrote: After you create your xyplot use library(grid) panel.text(grid.locator(),label=My label) Also, look up the 'page' argument in ?xyplot. Deepayan Cheers Francisco PS: How is good ol' David these days? From: Dean Sonneborn [EMAIL PROTECTED] To: r-help@stat.math.ethz.ch Subject: [R] footnote in postscript lattice Date: Thu, 26 Jan 2006 15:46:28 -0800 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
