Subversion Repositories bdplot

Rev

Rev 55 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 55 Rev 57
1
bdaxis <- function(side,...){
1
bdaxis <- function(side,...){
2
 
2
 
3
  switch(side,
3
  switch(side,
4
         {mgp <- bdp()$mgp.xaxis },
4
         {mgp <- bdp()$mgp.xaxis },
5
         {mgp <- bdp()$mgp.yaxis },
5
         {mgp <- bdp()$mgp.yaxis },
6
         {mgp <- bdp()$mgp.taxis },
6
         {mgp <- bdp()$mgp.taxis },
7
         {mgp <- bdp()$mgp.raxis }
7
         {mgp <- bdp()$mgp.raxis }
8
         ) 
8
         ) 
9
  axis(side, mgp=mgp, lwd=bdp()$lwd,...)
9
  axis(side, mgp=mgp, lwd=bdp()$lwd,...)
10
}
10
}
11
 
11