

   SSiimmuullaattiioonn ooff WWiieenneerr PPrroocceessss

        rwiener(end = 1, frequency = 1000)

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

        end: the time of the last observation.

   frequency: the number of observations per unit of time.

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

        `rwiener' returns a time series containing a simulated
        realization of the Wiener process on the interval
        [0,`end']

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

        # simulate a Wiener process on [0,1] and plot it

        x <- rwiener()
        plot(x,type="l")

