-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathRcppExports.cpp
More file actions
42 lines (39 loc) · 2.01 KB
/
RcppExports.cpp
File metadata and controls
42 lines (39 loc) · 2.01 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
// Generated by using Rcpp::compileAttributes() -> do not edit by hand
// Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
#include <RcppArmadillo.h>
#include <Rcpp.h>
using namespace Rcpp;
// likelihood_fun
double likelihood_fun(arma::mat M, arma::mat X, arma::vec w, arma::vec etaTilde, arma::mat R, double sigma2, int T);
RcppExport SEXP binaryGP_likelihood_fun(SEXP MSEXP, SEXP XSEXP, SEXP wSEXP, SEXP etaTildeSEXP, SEXP RSEXP, SEXP sigma2SEXP, SEXP TSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< arma::mat >::type M(MSEXP);
Rcpp::traits::input_parameter< arma::mat >::type X(XSEXP);
Rcpp::traits::input_parameter< arma::vec >::type w(wSEXP);
Rcpp::traits::input_parameter< arma::vec >::type etaTilde(etaTildeSEXP);
Rcpp::traits::input_parameter< arma::mat >::type R(RSEXP);
Rcpp::traits::input_parameter< double >::type sigma2(sigma2SEXP);
Rcpp::traits::input_parameter< int >::type T(TSEXP);
rcpp_result_gen = Rcpp::wrap(likelihood_fun(M, X, w, etaTilde, R, sigma2, T));
return rcpp_result_gen;
END_RCPP
}
// PQPL_estimate
List PQPL_estimate(arma::mat M, arma::mat X, arma::vec w, arma::vec etaTilde, arma::mat R, double sigma2, int T);
RcppExport SEXP binaryGP_PQPL_estimate(SEXP MSEXP, SEXP XSEXP, SEXP wSEXP, SEXP etaTildeSEXP, SEXP RSEXP, SEXP sigma2SEXP, SEXP TSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< arma::mat >::type M(MSEXP);
Rcpp::traits::input_parameter< arma::mat >::type X(XSEXP);
Rcpp::traits::input_parameter< arma::vec >::type w(wSEXP);
Rcpp::traits::input_parameter< arma::vec >::type etaTilde(etaTildeSEXP);
Rcpp::traits::input_parameter< arma::mat >::type R(RSEXP);
Rcpp::traits::input_parameter< double >::type sigma2(sigma2SEXP);
Rcpp::traits::input_parameter< int >::type T(TSEXP);
rcpp_result_gen = Rcpp::wrap(PQPL_estimate(M, X, w, etaTilde, R, sigma2, T));
return rcpp_result_gen;
END_RCPP
}