\Header{Strauss}{Simulates Strauss Spatial Point Process}
\keyword{spatial}{Strauss}
\begin{Description}\relax
Simulates Strauss spatial point process.
\end{Description}
\begin{Usage}
\begin{verbatim}
Strauss(n, c=0, r)
\end{verbatim}
\end{Usage}
\begin{Arguments}
\begin{ldescription}
\item[\code{n}] number of points

\item[\code{c}] parameter \code{c} in [0, 1]. \code{c} = 0 corresponds to complete inhibition at
distances up to \code{r}.

\item[\code{r}] inhibition distance

\end{ldescription}
\end{Arguments}
\begin{Details}\relax
Uses spatial birth-and-death process for 4\code{n} steps, or for 40\code{n} steps
starting from a binomial pattern on the first call from an other function.
Uses the region set by \code{ppinit} or \code{ppregion}.
\end{Details}
\begin{Value}
list of vectors of x and y coordinates
\end{Value}
\begin{Section}{Side Effects}
uses the random number generator
\end{Section}
\begin{References}\relax
Ripley, B. D. (1981) \emph{Spatial Statistics.} Wiley.

Venables, W. N. and Ripley, B. D. (2002)
\emph{Modern Applied Statistics with S.} Fourth edition.  Springer.
\end{References}
\begin{SeeAlso}\relax
\code{\Link{Psim}}, \code{\Link{SSI}}
\end{SeeAlso}
\begin{Examples}
\begin{ExampleCode}
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)))
\end{ExampleCode}
\end{Examples}

