## Not run:
# library(intubate)
# library(magrittr)
# library(earth)
#
# ## ntbt_earth: Multivariate Adaptive Regression Splines
# ## Original function to interface
# earth(Volume ~ ., data = trees)
#
# ## The interface puts data as first parameter
# ntbt_earth(trees, Volume ~ .)
#
# ## so it can be used easily in a pipeline.
# trees %>%
# ntbt_earth(Volume ~ .)
# ## End(Not run)
Run the code above in your browser using DataLab