if (FALSE) {
# These examples require external data files not included with the package
# Compare interpolation methods
method_comparison <- compare_interpolation_methods(
soil_data,
target_variable = "nitrogen",
methods = c("NN", "simple", "spline"),
cv_folds = 10
)
# View results
print(method_comparison)
# Best method
best_method <- method_comparison$method[which.min(method_comparison$rmse)]
}
Run the code above in your browser using DataLab