Code:

  library("plot")                ; loads library plot
  xmin = 0                       ; grid minimum
  xmax = 2*pi                    ; grid maximum
  n    = 100                     ; number of grid points
  x = xmin + (xmax-xmin)/(n-1) .* (0:n-1)  ; generates grid  
  y = sin(x)                     ; computes sin(x)
  plot(x~y)                      ; plots data set

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