if (FALSE) {
if (bru_safe_inla(quietly = TRUE)) {
# Load Gorilla data
data("gorillas", package = "inlabru")
# Check if all Gorilla nests are inside the mesh
all(is.inside(gorillas$mesh, gorillas$nests))
# Also works for locations not stored as SpatialPoints object
loc <- coordinates(gorillas$nests)
all(is.inside(gorillas$mesh, loc))
}
}
Run the code above in your browser using DataLab