

   PPsseeuuddoo--lliikkeelliihhoooodd EEssttiimmaattiioonn ooff aa 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o--
   cceessss

        pplik(pp, R, ng=25)

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

         pp: a pp object

          R: the fixed parameter `R'

         ng: use a `ng' x `ng' grid with border `R' in the
             domain for numerical integration.

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

        Pseudo-likelihood estimation of a Strauss spatial point
        process.

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

        estimate for `c' in the interval `[0, 1]'.

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

        `Strauss'

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

        pines <- ppinit("pines.dat")
        pplik(pines, 0.7)

