Subversion Repositories bdplot

Rev

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

Rev 30 Rev 34
Line 16... Line 16...
16 
    }
 16 
    }
17 
 
 17 
 
18 
}
 18 
}
19 
 
 19 
 
20 
 
 20 
 
21 
bdpoints <- function(x,y=NULL,type="points",lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,cex=bdp()$cex.plot,...){
 21 
bdpoints <- function(x,y=NULL,type="p",lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,cex=bdp()$cex.plot,...){
22 
 
 22 
 
23 
  bdxyadd(x,y=y,type=type,lwd=lwd,pch=pch,col=col,cex=cex,...)
 23 
  bdxyadd(x,y=y,type=type,lwd=lwd,pch=pch,col=col,cex=cex,...)
24 
}
 24 
}
25 
 
 25 
 
26 
 
 26 
 
27 
bdlines <- function(x,y=NULL,type="lines",lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,cex=bdp()$cex.plot,...){
 27 
bdlines <- function(x,y=NULL,type="l",lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,cex=bdp()$cex.plot,...){
28 
 
 28 
 
29 
  bdxyadd(x,y=y,type=type,lwd=lwd,pch=pch,col=col,cex=cex,...)
 29 
  bdxyadd(x,y=y,type=type,lwd=lwd,pch=pch,col=col,cex=cex,...)
30 
}
 30 
}
31 
 
 31 
 
32 
bdabline <- function(a = NULL, b = NULL, h = NULL, v = NULL, reg = NULL,
32 
bdabline <- function(a = NULL, b = NULL, h = NULL, v = NULL, reg = NULL,