home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / science / xlspstr1.sit / Examples / abrasiondemo.lsp next >
Text File  |  1989-07-26  |  308b  |  10 lines

  1. #+macintosh(require ":data:tutorial")
  2. #+unix(load-data "tutorial")
  3.  
  4. (scatterplot-matrix 
  5.  (list hardness tensile-strength abrasion-loss)
  6.  :variable-labels '("Hardness" "Tensile Strength" "Abrasion Loss"))
  7.  
  8. (spin-plot (list hardness tensile-strength abrasion-loss)
  9.            :variable-labels '("H" "T" "A"))
  10.