## Not run:
# library(intubate)
# library(magrittr)
# library(frontier)
#
#
# ## ntbt_sfa: Stochastic Frontier Analysis
# data(front41Data)
#
# ## Original function to interface
# sfa(log(output) ~ log(capital) + log(labour), data = front41Data)
#
# ## The interface puts data as first parameter
# ntbt_sfa(front41Data, log(output) ~ log(capital) + log(labour))
#
# ## so it can be used easily in a pipeline.
# front41Data %>%
# ntbt_sfa(log(output) ~ log(capital) + log(labour))
# ## End(Not run)
Run the code above in your browser using DataLab