# \donttest{
if (requireNamespace("rsample", quietly = TRUE)) {
# Register hooks for rsample
borg_register_hooks("rsample")
# Now vfold_cv() will check for dependencies
spatial_data <- data.frame(
lon = runif(50), lat = runif(50), response = rnorm(50)
)
options(borg.check_data = spatial_data)
options(borg.check_coords = c("lon", "lat"))
# Remove hooks
borg_unregister_hooks()
}
# }
Run the code above in your browser using DataLab