Subversion Repositories bdplot

(root)/bdgraphics/R/4_bd.devoff.R – Rev 5 → 8


## this should also reset par to defaults
bd.devoff <- function(reset=TRUE,reread=FALSE)
{
  if(reset)
    bd.reset(reread=reread)
 
    dev.off()
}
 
 

Rev 5	Rev 8
-		1	`## this should also reset par to defaults`
1	`bd.devoff <- function(reset=TRUE,reread=FALSE)`	2	`bd.devoff <- function(reset=TRUE,reread=FALSE)`
2	`{`	3	`{`
3	`if(reset)`	4	`if(reset)`
4	`bd.reset(reread=reread)`	5	`bd.reset(reread=reread)`
5		6
6	`dev.off()`	7	`dev.off()`
7	`}`	8	`}`
8		9
9		10