Subversion Repositories bdplot

Rev

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

Rev 10 Rev 31
Line 1... Line 1...
1 
bdlegend <- function(legend,cex=bdp()$cex.legend,x=bdp()$pos.legend,bg=bdp()$bg.legend,col=bdp()$col,...){
 1 
bdlegend <- function(legend,cex=bdp()$cex.legend,x=bdp()$pos.legend,bg=bdp()$bg.legend,col=bdp()$col,...){
- 
 
 2 
 
2 
  prm <- .bdgetpars()
 3 
  ##  prm <- .bdgetpars()
3 
  ## dette er noget rod med baade x og pos, hvis man giver begge dele fucker det op.
 - 
 
- 
 
 4 
 
4 
  legend(x=x,
 5 
  legend(x=x,
5 
         cex=cex,
 6 
         cex=cex,
6 
         legend=legend,
 7 
         legend=legend,
7 
         bg=bg,
 8 
         bg=bg,
8 
         col=col,
 9 
         col=col,