

   PPoollyyggoonn DDrraawwiinngg

   AArrgguummeennttss::

        x,y: vectors containing the coordinates of the vertices
             of the polygon.

        col: an integer specifying the color to be used in
             filling the polygon.  The default is to leave
             polygons unfilled.

     border: the color to draw the border.  The default is to
             leave the border undrawn.

        ...: graphical parameters can be given as arguments to
             `polygon'.

   DDeessccrriippttiioonn::

        `polygon' draws the polygons whose vertices are given
        in `x' and `y'.  Note that if neither of `col' or `bor-
        der' is specified then nothing is drawn.

   SSeeee AAllssoo::

        `segments' for even more flexibility, `lines', `rect',
        `box', `abline'.

   EExxaammpplleess::

        n <- 100
        xx <- c(0:n, n:0)
        yy <- c(c(0,cumsum(rnorm(n))), rev(c(0,cumsum(rnorm(n)))))
        plot   (xx, yy, type="n", xlab="Time", ylab="Distance")
        polygon(xx, yy, col="gray")
        title("Distance Between Brownian Motions")

