Environment for creative processing of text and numerical data

Enhanced scatter plot

S.Mustonen, Survo Users' Guide (1992), pp. 291-293

Edit field:

   1 *
   2 *VAR Brthrate=1000*Births/Popul TO FINLAND 
   3 *VAR Taxdiff=Tax-12 TO FINLAND 
   4 *........................................................................
   5 *PLOT FINLAND,Income,Brthrate    / DEVICE=PS,FINLAND1.PS  SIZE=1164,720
   6 *POINT=5,10,Taxdiff,8
   7 *........................................................................
   8 *DATA-DEPENDENT PART:
   9 *  HEADER=FINLAND:_Rectangle_width_=_20-Tax____Rectangle_height_=_Agri+1
  10 *  X-Y variables:
  11 *     VX=DATA:FINLAND,Income VY=DATA:FINLAND,Brthrate
  12 *     XSCALE=7000,10000,20000,30000 YSCALE=0(5)30
  13 *     XLABEL=Income                 YLABEL=Brthrate
  14 *  Rectangle variables:
  15 *     Vx=DATA:FINLAND,Tax   Vy=DATA:FINLAND,Agri
  16 *     Transformations:
  17 *     vx=100*(20-Vx)   vy=(Vy+1)/6
  18 *
  19 *GENERAL PART:
  20 *  xx=VX-vx/2 yy=VY-vy/2
  21 *  T=0,4,1
  22 *  X1=if(T =1)then(xx+T*vx)else(X2)  Y1=if(T =1)then(yy)else(Y2)
  23 *  X2=if(T =2)then(xx+vx)else(X3)    Y2=if(T =2)then(yy+(T-1)*vy)else(Y3)
  24 *  X3=if(T =3)then(xx+vx-(T-2)*vx)else(X4) Y3=if(T =3)then(yy+vy)else(Y4)
  25 *  X4=xx                             Y4=yy+vy-(T-3)*vy
  26 *
  27 *PLOT X(T)=X1,Y(T)=Y1            / DEVICE=PS,FINLAND2.PS  SIZE=1164,720
  28 *........................................................................
  29 *PRINT CUR+1,CUR+4 TO EX.PS 
  30 % 750
  31 - picture FINLAND1.PS
  32 % 750
  33 - picture FINLAND2.PS
  34 *

  Index | Catalog | Previous | Next