Subversion Repositories bdplot

Rev

Rev 23 | Rev 27 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 23 Rev 24
Line 4... Line 4...
4 
### In X11, height  and width are scaled to get a nicer window on the screen.
 4 
### In X11, height  and width are scaled to get a nicer window on the screen.
5 
### This hack is ugly. At least there should be a scaling factor in stead so that all measures are scaled (fonts, etc).
 5 
### This hack is ugly. At least there should be a scaling factor in stead so that all measures are scaled (fonts, etc).
6 
 
 6 
 
7 
bdopen <- function(file=bdp()$file,paper=bdp()$paper,mfrow=bdp()$mfrow)
 7 
bdopen <- function(file=bdp()$file,paper=bdp()$paper,mfrow=bdp()$mfrow)
8 
{
 8 
{
9 
  .bdcalcsizes(paper=paper)
 9 
  .bdcalcsizes(paper=paper,mfrow=mfrow)
10 
  prm <- .bdgetpars()
 10 
  prm <- .bdgetpars()
11 
  if( !is.na(file) )
 11 
  if( !is.na(file) )
12 
    {
 12 
    {
13 
      ## If figdir is supplied, prepending it to filename.
 13 
      ## If figdir is supplied, prepending it to filename.
14 
      if(!is.null(prm$figdir)&!is.na(prm$figdir))
 14 
      if(!is.null(prm$figdir)&!is.na(prm$figdir))