##
## This is effectively an internal function, so the example is commented out
## in order for R's check to run faster.
##
data(geom001)
data(geom000)
data(ICPg240Locs)
hold <- make.SpatialVx( geom000, geom001,
thresholds=c(0.01,50.01),
loc=ICPg240Locs, units="mm/h")
look <- hoods2d(hold, levels=c(1, 3, 5, 33, 65),
verbose=TRUE)
plot( look)
Run the code above in your browser using DataLab