Subversion Repositories bdplot

Rev

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

Rev 22 Rev 28
Line 94... Line 94...
94 
           ...)
 94 
           ...)
95 
    }
 95 
    }
96 
  } else if( class(x) == "acf"){
 96 
  } else if( class(x) == "acf"){
97 
    ## Not cleaned up/checked
 97 
    ## Not cleaned up/checked
98 
    plot(x, xlab="", ylab="", xaxt="n", yaxt="n", cex=prm$cex.plot, xlim=prm$xlim, ylim=prm$ylim,col=col,...)
 98 
    plot(x, xlab="", ylab="", xaxt="n", yaxt="n", cex=prm$cex.plot, xlim=prm$xlim, ylim=prm$ylim,col=col,...)
99 
  }
 - 
 
100 
  else if( class(x) == "histogram"){
 99 
  }  else if( class(x) == "histogram"){
101 
    ## Notice: the color of the bars can ONLY be set width bdp(hcol="color").
 100 
    ## Notice: the color of the bars can ONLY be set width bdp(hcol="color").
102 
    plot(x,
 101 
    plot(x,
103 
         xlab=xlab, ylab=ylab,
 102 
         xlab=xlab, ylab=ylab,
104 
         main=prm$main,
 103 
         main=prm$main,
105 
         xaxt="n",yaxt="n",col=bdp()$hcol,
 104 
         xaxt="n",yaxt="n",col=bdp()$hcol,
Line 114... Line 113...
114 
    trellis.par.set(prm$myLatticeSettings())
113 
    trellis.par.set(prm$myLatticeSettings())
115 
    plot(x,col=col,...)
 114 
    plot(x,col=col,...)
116 
    ## with lattice/trellis, the axis drawing doesn't work.
 115 
    ## with lattice/trellis, the axis drawing doesn't work.
117 
    prm$draw.xaxis <- FALSE
 116 
    prm$draw.xaxis <- FALSE
118 
    prm$draw.yaxis <- FALSE
 117 
    prm$draw.yaxis <- FALSE
- 
 
 118 
  } else if (class(x)=="princomp") {
119 
  }
 119 
    plot(x,
- 
 
 120 
         main=prm$main,
- 
 
 121 
         ...)
120 
  else if (prm$method=="image.plot"){
 122 
  } else if (prm$method=="image.plot"){
121 
    ### This could be checked in the beginning by is.null(z)
 123 
    ### This could be checked in the beginning by is.null(z)
122 
    cat("The Bacher/Delff Plotting System (R), (C), TM operating in image plotting mode.\nx and y axis can not be configured.\n")
 124 
    cat("The Bacher/Delff Plotting System (R), (C), TM operating in image plotting mode.\nx and y axis can not be configured.\n")
123 
    image.plot(x=x,y=y,z=z,
 125 
    image.plot(x=x,y=y,z=z,
124 
               xlab=xlab,
 126 
               xlab=xlab,
125 
               ylab=ylab,
 127 
               ylab=ylab,