home *** CD-ROM | disk | FTP | other *** search
/ Garbo / Garbo.cdr / mac / science / xlspstr1.sit / Examples / tourdemo.lsp < prev   
Text File  |  1989-07-26  |  255b  |  9 lines
  1. #+macintosh(require "tour" ":Examples:tour")
  2. #+macintosh(require ":Data:iris")
  3. #+unix(require "tour" "Examples/tour")
  4. #+unix(load-data "iris")
  5.  
  6. (tour-plot 
  7.  (mapcar  #'(lambda (x) (select x (* 2 (iseq 0 74)))) iris) 
  8.  :variable-labels '("X" "Y" "Z" "W"))
  9.