Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- grd <- Sobj_SpatialGrid(ndvi_pts, maxDim=100)$SG
- response <- unclass(ndvi_pts@data)[[1]]
- ndvi_idw <- idw(response~1, ndvi_pts, newdata=grd)
- kriging_result=autoKrige(response~1, ndvi_pts, new_data=grd, nmax=7)
Add Comment
Please, Sign In to add comment