Code:

  library("plot")            ; loads library plot
  data = read ("bostonh")    ; reads Boston Housing data
  data = data[1:70,]         ; select first 70 observations
  col  = grc.col.green-grc.col.blue
  col  = grc.col.blue+col*(data[,14]<mean(data[,14])) 
                             ; colors observations blue and green
  plotstar (data, grc.prep.zeroone, col)
                             ; shows star diagram of the data

© MD*Tech - Method and Data Technologies, generated on 6.6.2000 .