Subversion Repositories bdplot

Rev

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

Rev 32 Rev 33
Line 38... Line 38...
38 
  par(mar=mar)
 38 
  par(mar=mar)
39 
 
 39 
 
40 
  par(mgp=prm$mgp.global)
 40 
  par(mgp=prm$mgp.global)
41 
 
 41 
 
42 
  ## if xaxt or yaxt set, axis are drawn automatically in the plot command. Then it should not be done with axis() later
 42 
  ## if xaxt or yaxt set, axis are drawn automatically in the plot command. Then it should not be done with axis() later
43 
  prm$draw.xaxis <- ifelse(xaxt="n",prm$draw.xaxis,FALSE)
 43 
  prm$draw.xaxis <- ifelse(xaxt=="n",prm$draw.xaxis,FALSE)
44 
  prm$draw.yaxis <- ifelse(yaxt="n",prm$draw.yaxis,FALSE)
 44 
  prm$draw.yaxis <- ifelse(yaxt=="n",prm$draw.yaxis,FALSE)
45
45
46 
  ## Do the plot
 46 
  ## Do the plot
47 
  if(!is.null(y)){
 47 
  if(!is.null(y)){
48 
    if(prm$debug)
 48 
    if(prm$debug)
49 
      cat("The Bacher/Delff Plotting System (R), (C), TM operating in xy-plotting mode.\n")
 49 
      cat("The Bacher/Delff Plotting System (R), (C), TM operating in xy-plotting mode.\n")