The R Project SVN R

Rev

Rev 7602 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7602 Rev 10217
Line 41... Line 41...
41 
      } else {
 41 
      } else {
42 
        s = old
 42 
        s = old
43 
      }
 43 
      }
44 
      old = ""
 44 
      old = ""
45 
      for (j = 1; j < lc; j++) { old = old " " }
 45 
      for (j = 1; j < lc; j++) { old = old " " }
46 
      old = old " " a[i]
 46 
      new = old " " a[i]
47 
    }
 - 
 
48 
    else {
 - 
 
49 
      old = new
 - 
 
50 
    }
 47 
    }
- 
 
 48 
    old = new
51 
  }
 49 
  }
52 
  if (length(s) > 0) {
 50 
  if (length(s) > 0) {
53 
    s = s "\n" new
 51 
    s = s "\n" new
54 
  } else {
 52 
  } else {
55 
    s = old
 53 
    s = old