pdf.figure.proof: Creates a nice pdf for a single plot

In c97sr/SRileyIDD: A holding package for Steven Riley's modelling and analysis code

Usage

pdf.figure.proof(findex = 1, file = paste("./pdf_sub_", findex, ".pdf", sep = ""), pw = 7, ph = 7, textscale = 0.6, xpd = NA)

Arguments

findex
file
pw
ph
textscale
xpd

Examples

##---- Should be DIRECTLY executable !! ----
##-- ==>  Define data, use random,
##--	or do  help(data=index)  for the standard data sets.

## The function is currently defined as
function (findex = 1, file = paste("./pdf_sub_", findex, ".pdf", 
    sep = ""), pw = 7, ph = 7, textscale = 0.6, xpd = NA) 
{
    plotwidth <- pw/cm(1)
    plotheight <- ph/cm(1)
    margin <- 5/cm(1)
    pdfwidth <- plotwidth + 2 * margin
    pdfheight <- plotheight + 2 * margin
    posplot = c(margin/pdfwidth, (margin + plotwidth)/pdfwidth, 
        margin/pdfheight, (margin + plotheight)/pdfheight)
    pdf(file = file, height = pdfheight, width = pdfwidth, useDingbats = FALSE)
    par(cex = textscale, fig = posplot, mai = c(0, 0, 0, 0), 
        xpd = xpd)
  }

c97sr/SRileyIDD documentation built on May 13, 2019, 10:36 a.m.