Details |
Last modification |
View Log
| RSS feed
Rev |
Author |
Line No. |
Line |
55 |
pdel |
1 |
bdaxis <- function(side,...){
|
|
|
2 |
|
|
|
3 |
switch(side,
|
|
|
4 |
{mgp <- bdp()$mgp.xaxis },
|
|
|
5 |
{mgp <- bdp()$mgp.yaxis },
|
|
|
6 |
{mgp <- bdp()$mgp.taxis },
|
|
|
7 |
{mgp <- bdp()$mgp.raxis }
|
|
|
8 |
)
|
|
|
9 |
axis(side, mgp=mgp, lwd=bdp()$lwd,...)
|
|
|
10 |
}
|