

   CCoommppuuttee KK--ffnn ooff aa PPooiinntt PPaatttteerrnn

        Kfn(pp, fs, k=100)

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

         pp: a list such as a pp object, including components
             `x' and `y'

         fs: full scale of the plot

          k: number of regularly spaced distances in (0, `fs')

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

        relies on the domain D having been set by `ppinit' or
        `ppregion'.

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

        A list with components

          x: vector of distances

          y: vector of L-fn values

          k: number of distances returned -- may be less than
             `k' if `fs' is too large

       dmin: minimum distance between pair of points

         lm: maximum deviation from L(t) = t

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

        `ppinit', `ppregion', `Kaver', `Kenvl'

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

        towns <- ppinit("towns.dat")
        par(pty="s")
        plot(Kfn(towns, 10), type="s", xlab="distance", ylab="L(t)")

