footnote in postscript lattice

classic Classic list List threaded Threaded
4 messages Options
Reply | Threaded
Open this post in threaded view
|

footnote in postscript lattice

Dean Sonneborn
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

______________________________________________
[hidden email] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
Reply | Threaded
Open this post in threaded view
|

Re: footnote in postscript lattice

Francisco J. Zagmutt
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 <[hidden email]>
>To: [hidden email]
>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
>
>______________________________________________
>[hidden email] mailing list
>https://stat.ethz.ch/mailman/listinfo/r-help
>PLEASE do read the posting guide!
>http://www.R-project.org/posting-guide.html

______________________________________________
[hidden email] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
Reply | Threaded
Open this post in threaded view
|

Re: footnote in postscript lattice

Deepayan Sarkar
On 1/26/06, Francisco J. Zagmutt <[hidden email]> 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 <[hidden email]>
> >To: [hidden email]
> >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

______________________________________________
[hidden email] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
Reply | Threaded
Open this post in threaded view
|

Re: footnote in postscript lattice

Gesmann, Markus
In reply to this post by Dean Sonneborn
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: [hidden email]
[mailto:[hidden email]] On Behalf Of Dean Sonneborn
Sent: 26 January 2006 23:46
To: [hidden email]
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

______________________________________________
[hidden email] 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}}

______________________________________________
[hidden email] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html