Subversion Repositories bdplot

(root)/bdgraphics/R/4_bdplot.R – Rev 59 → 60



 
  ##Title stuff
  ## Hvorfor??
  scale <- 1
 
 
  if( !is.na(prm$tlab) ){
    mtext(prm$tlab, side=3, line=0.25, cex=prm$cex.lab/scale)
  }
  if( !is.na(prm$rlab) ){
    mtext(prm$rlab, side=4, line=0.75, cex=prm$cex.lab/scale,mgp=prm$mgp.raxis)

Rev 59	Rev 60
Line 314...	Line 314...
314		314
315	`##Title stuff`	315	`##Title stuff`
316	`## Hvorfor??`	316	`## Hvorfor??`
317	`scale <- 1`	317	`scale <- 1`
318		318
319		-
320	`if( !is.na(prm$tlab) ){`	319	`if( !is.na(prm$tlab) ){`
321	`mtext(prm$tlab, side=3, line=0.25, cex=prm$cex.lab/scale)`	320	`mtext(prm$tlab, side=3, line=0.25, cex=prm$cex.lab/scale)`
322	`}`	321	`}`
323	`if( !is.na(prm$rlab) ){`	322	`if( !is.na(prm$rlab) ){`
324	`mtext(prm$rlab, side=4, line=0.75, cex=prm$cex.lab/scale,mgp=prm$mgp.raxis)`	323	`mtext(prm$rlab, side=4, line=0.75, cex=prm$cex.lab/scale,mgp=prm$mgp.raxis)`