RcppExports has changed, don't know why...
This commit is contained in:
parent
34069530d0
commit
29ac4bd9eb
|
@ -41,34 +41,6 @@ ML_full <- function(par, Inst, Conf) {
|
|||
.Call('MSL_ML_full', PACKAGE = 'MSL', par, Inst, Conf)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function EUT - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_EUT <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_EUT', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Power pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_pow <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_pow', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Inverse-S pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_invs <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_invs', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Prelec pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_prelec <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_prelec', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function EUT - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
|
@ -125,3 +97,31 @@ MSL_RDU_prelec_par <- function(par, covars, covindex, HD, Inst, instindex, choic
|
|||
.Call('MSL_MSL_RDU_prelec_par', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function EUT - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_EUT <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_EUT', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Power pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_pow <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_pow', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Inverse-S pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_invs <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_invs', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
#' Per Choice MSL Function RDU with Prelec pfunc - Fixed Inst
|
||||
#'
|
||||
#' @export
|
||||
MSL_RDU_prelec <- function(par, covars, covindex, HD, Inst, instindex, choice, lone) {
|
||||
.Call('MSL_MSL_RDU_prelec', PACKAGE = 'MSL', par, covars, covindex, HD, Inst, instindex, choice, lone)
|
||||
}
|
||||
|
||||
|
|
|
@ -136,78 +136,6 @@ BEGIN_RCPP
|
|||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_EUT
|
||||
arma::vec MSL_EUT(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_EUT(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_EUT(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_pow
|
||||
arma::vec MSL_RDU_pow(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_pow(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_pow(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_invs
|
||||
arma::vec MSL_RDU_invs(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_invs(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_invs(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_prelec
|
||||
arma::vec MSL_RDU_prelec(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_prelec(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_prelec(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_EUT_nocor
|
||||
arma::vec MSL_EUT_nocor(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_EUT_nocor(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
|
@ -349,3 +277,75 @@ BEGIN_RCPP
|
|||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_EUT
|
||||
arma::vec MSL_EUT(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_EUT(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_EUT(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_pow
|
||||
arma::vec MSL_RDU_pow(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_pow(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_pow(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_invs
|
||||
arma::vec MSL_RDU_invs(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_invs(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_invs(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
// MSL_RDU_prelec
|
||||
arma::vec MSL_RDU_prelec(NumericVector par, arma::mat covars, List covindex, List HD, arma::mat Inst, List instindex, arma::vec choice, int lone);
|
||||
RcppExport SEXP MSL_MSL_RDU_prelec(SEXP parSEXP, SEXP covarsSEXP, SEXP covindexSEXP, SEXP HDSEXP, SEXP InstSEXP, SEXP instindexSEXP, SEXP choiceSEXP, SEXP loneSEXP) {
|
||||
BEGIN_RCPP
|
||||
Rcpp::RObject rcpp_result_gen;
|
||||
Rcpp::RNGScope rcpp_rngScope_gen;
|
||||
Rcpp::traits::input_parameter< NumericVector >::type par(parSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type covars(covarsSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type covindex(covindexSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type HD(HDSEXP);
|
||||
Rcpp::traits::input_parameter< arma::mat >::type Inst(InstSEXP);
|
||||
Rcpp::traits::input_parameter< List >::type instindex(instindexSEXP);
|
||||
Rcpp::traits::input_parameter< arma::vec >::type choice(choiceSEXP);
|
||||
Rcpp::traits::input_parameter< int >::type lone(loneSEXP);
|
||||
rcpp_result_gen = Rcpp::wrap(MSL_RDU_prelec(par, covars, covindex, HD, Inst, instindex, choice, lone));
|
||||
return rcpp_result_gen;
|
||||
END_RCPP
|
||||
}
|
||||
|
|
Reference in New Issue