

   SSiimmuullaatteess SSttrraauussss SSppaattiiaall PPooiinntt PPrroocceessss

        Strauss(n, c=0, r)

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

          n: number of points

          c: parameter `c' in [0, 1]. `c' = 0 corresponds to
             complete inhibition at distances up to `r'.

          r: inhibition distance

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

        Simulates Strauss spatial point process.

   DDeettaaiillss::

        Uses spatial birth-and-death process for 4`n' steps, or
        for 40`n' steps starting from a binomial pattern on the
        first call from an other function.  Uses the region set
        by `ppinit' or `ppregion'.

   VVaalluuee::

        list of vectors of x and y coordinates

   SSiiddee EEffffeeccttss::

        uses the random number generator

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

        `Psim', `SSI'

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

        towns <- ppinit("towns.dat")
        par(pty="s")
        plot(Kfn(towns, 10), type="b", xlab="distance", ylab="L(t)")
        lines(Kaver(10,25,Strauss(69,0.5,3.5)))

