Subversion Repositories bdplot

Rev

Rev 31 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 31 Rev 37
1 
bdlegend <- function(legend,cex=bdp()$cex.legend,x=bdp()$pos.legend,bg=bdp()$bg.legend,col=bdp()$col,...){
 1 
bdlegend <- function(legend,x=bdp()$pos.legend,col=bdp()$col,bg=bdp()$bg.legend,cex=bdp()$cex.legend,...){
2 
 
 2 
 
3 
  ##  prm <- .bdgetpars()
 3 
  ##  prm <- .bdgetpars()
4 
 
 4 
 
5 
  legend(x=x,
 5 
  legend(x=x,
6 
         cex=cex,
 6 
         cex=cex,
7 
         legend=legend,
 7 
         legend=legend,
8 
         bg=bg,
 8 
         bg=bg,
9 
         col=col,
 9 
         col=col,
10 
         ...)
 10 
         ...)
11
11
12 
}
 12 
}
13 
 
 13