
Last chance! 50% off unlimited learning
Sale ends in
H <- hyperframe(id=1:10)
H$X <- eval.hyper(rpoispp(100),H)
H$D <- eval.hyper(distmap(X), H)
# points only
plot(H[,"X"])
plot(H, plot(X, main=id))
# points superimposed on images
plot(H, {plot(D, main=id); plot(X, add=TRUE)})
Run the code above in your browser using DataLab