## Not run:
# library(intubate)
# library(magrittr)
# library(mnlogit)
#
#
# ## ntbt_mnlogit: Fast estimation of multinomial logit models
# library(mnlogit)
# data(Fish, package = "mnlogit")
#
# ## Original function to interface
# mnlogit(mode ~ price | income | catch, Fish, ncores = 2)
#
# ## The interface puts data as first parameter
# ntbt_mnlogit(Fish, mode ~ price | income | catch, ncores = 2)
#
# ## so it can be used easily in a pipeline.
# Fish %>%
# ntbt_mnlogit(mode ~ price | income | catch, ncores = 2)
# ## End(Not run)
Run the code above in your browser using DataLab