Subversion Repositories bdplot

Rev

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

Rev 10 Rev 28
Line 1... Line 1...
1 
## a function to add points or lines to a plot. det kan skrives meget
 1 
## a function to add points or lines to a plot. det kan skrives meget
2 
## paenere, om en streng indeholder en karakter.
 2 
## paenere, om en streng indeholder en karakter.
3 
 
 3 
 
4 
## grep("l",type)
 4 
## grep("l",type)
5 
 
 5 
 
6 
bdxyadd <- function(x,y=NULL,type=bdp()$type,lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,...){
 6 
bdxyadd <- function(x,y=NULL,type=bdp()$type,lwd=bdp()$lwd,pch=bdp()$pch,col=bdp()$col,cex=bdp()$cex,...){
7 
 
 7 
 
8 
  prm <- .bdgetpars()
 8 
  prm <- .bdgetpars()
9
9
10 
  if(any(type=="p",type=="l",type=="s")){
 10 
  if(any(type=="p",type=="l",type=="s")){
11 
    if(!is.null(y)){
 11 
    if(!is.null(y)){