Last chance! 50% off unlimited learning
Sale ends in
# generate simulated data
X <- replicate(3, rpoispp(100), simplify=FALSE)
names(X) <- paste("Simulation", 1:3)
# compute K function estimates
Klist <- lapply(X, Kest)
# collapse
K <- collapse.fv(Klist, same="theo", different="iso")
K
Run the code above in your browser using DataLab