[ top | up ]
Average K-functions from Simulations
Usage
Kaver(fs, nsim, ...)
Arguments
fs
|
full scale for K-fn
|
nsim
|
number of simulations
|
...
|
arguments to simulate one point process object
|
Value
list with components x
and y
of the average K-fn on L-scale.
See Also
Kfn
, Kenvl
Examples
towns <- ppinit("towns.dat")
par(pty="s")
plot(Kfn(towns, 40), type="b")
plot(Kfn(towns, 10), type="b", xlab="distance", ylab="L(t)")
for(i in 1:10) lines(Kfn(Psim(69), 10))
lims <- Kenvl(10,100,Psim(69))
lines(lims$x,lims$l, lty=2, col="green")
lines(lims$x,lims$u, lty=2, col="green")
lines(Kaver(10,25,Strauss(69,0.5,3.5)), col="red")