localKinhom(X, lambda, ...,
              correction = "Ripley", verbose = TRUE, rvalue=NULL,
              sigma = NULL, varcov = NULL)
  localLinhom(X, lambda, ..., 
              correction = "Ripley", verbose = TRUE, rvalue=NULL,
              sigma = NULL, varcov = NULL)"ppp").X,
    a pixel image (object of class "im") giving the
    intensity values at all locatiolambda is present.
    Passed to density.ppp if lambda is omitted."none", "translate", "Ripley",
    "isotropic" or "best".
    Only one correction may be specified.density.ppp to control
    the kernel smoothing procedure for estimating lambda,
    if lambda is missing.rvalue is given, the result is a numeric vector
  of length equal to the number of points in the point pattern.  If rvalue is absent, the result is 
  an object of class "fv", see fv.object,
  which can be plotted directly using plot.fv.
  Essentially a data frame containing columns
i corresponds to the ith point.
  The last two columns contain the r and theo values.localKinhom and localLinhom
  are inhomogeneous or weighted versions of the
  neighbourhood density function implemented in
  localK and localL.  Given a spatial point pattern X, the
  inhomogeneous neighbourhood density function
  $L_i(r)$ associated with the $i$th point
  in X is computed by
  $$L_i(r) = \sqrt{\frac 1 \pi \sum_j \frac{e_{ij}}{\lambda_j}}$$
  where the sum is over all points $j \neq i$ that lie
  within a distance $r$ of the $i$th point, 
  $\lambda_j$ is the estimated intensity of the
  point pattern at the point $j$,
  and $e_{ij}$ is an edge correction
  term (as described in Kest).
  The value of $L_i(r)$ can also be interpreted as one
  of the summands that contributes to the global estimate of the
  inhomogeneous L function (see Linhom).
  By default, the function $L_i(r)$ or
  $K_i(r)$ is computed for a range of $r$ values
  for each point $i$. The results are stored as a function value
  table (object of class "fv") with a column of the table
  containing the function estimates for each point of the pattern
  X.
  Alternatively, if the argument rvalue is given, and it is a
  single number, then the function will only be computed for this value
  of $r$, and the results will be returned as a numeric vector,
  with one entry of the vector for each point of the pattern X.
Kinhom,
  Linhom,
  localK,
  localL.data(ponderosa)
  X <- ponderosa
  # compute all the local L functions
  L <- localLinhom(X)
  # plot all the local L functions against r
  plot(L, main="local L functions for ponderosa", legend=FALSE)
  # plot only the local L function for point number 7
  plot(L, iso007 ~ r)
  
  # compute the values of L(r) for r = 12 metres
  L12 <- localL(X, rvalue=12)Run the code above in your browser using DataLab