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
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
|
// Generated by using Rcpp::compileAttributes() -> do not edit by hand
// Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393
#include "../inst/include/cubature.h"
#include <Rcpp.h>
using namespace Rcpp;
// doCuhre
Rcpp::List doCuhre(int nComp, SEXP f, int nDim, int nVec, int minEval, int maxEval, double absTol, double relTol, SEXP stateFile, int key, int flag);
RcppExport SEXP _cubature_doCuhre(SEXP nCompSEXP, SEXP fSEXP, SEXP nDimSEXP, SEXP nVecSEXP, SEXP minEvalSEXP, SEXP maxEvalSEXP, SEXP absTolSEXP, SEXP relTolSEXP, SEXP stateFileSEXP, SEXP keySEXP, SEXP flagSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type nComp(nCompSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< int >::type nDim(nDimSEXP);
Rcpp::traits::input_parameter< int >::type nVec(nVecSEXP);
Rcpp::traits::input_parameter< int >::type minEval(minEvalSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absTol(absTolSEXP);
Rcpp::traits::input_parameter< double >::type relTol(relTolSEXP);
Rcpp::traits::input_parameter< SEXP >::type stateFile(stateFileSEXP);
Rcpp::traits::input_parameter< int >::type key(keySEXP);
Rcpp::traits::input_parameter< int >::type flag(flagSEXP);
rcpp_result_gen = Rcpp::wrap(doCuhre(nComp, f, nDim, nVec, minEval, maxEval, absTol, relTol, stateFile, key, flag));
return rcpp_result_gen;
END_RCPP
}
// doVegas
Rcpp::List doVegas(int nComp, SEXP f, int nDim, int nVec, int minEval, int maxEval, double absTol, double relTol, int nStart, int nIncrease, int nBatch, int gridNo, SEXP stateFile, int seed, int flag, int cuba_args);
RcppExport SEXP _cubature_doVegas(SEXP nCompSEXP, SEXP fSEXP, SEXP nDimSEXP, SEXP nVecSEXP, SEXP minEvalSEXP, SEXP maxEvalSEXP, SEXP absTolSEXP, SEXP relTolSEXP, SEXP nStartSEXP, SEXP nIncreaseSEXP, SEXP nBatchSEXP, SEXP gridNoSEXP, SEXP stateFileSEXP, SEXP seedSEXP, SEXP flagSEXP, SEXP cuba_argsSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type nComp(nCompSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< int >::type nDim(nDimSEXP);
Rcpp::traits::input_parameter< int >::type nVec(nVecSEXP);
Rcpp::traits::input_parameter< int >::type minEval(minEvalSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absTol(absTolSEXP);
Rcpp::traits::input_parameter< double >::type relTol(relTolSEXP);
Rcpp::traits::input_parameter< int >::type nStart(nStartSEXP);
Rcpp::traits::input_parameter< int >::type nIncrease(nIncreaseSEXP);
Rcpp::traits::input_parameter< int >::type nBatch(nBatchSEXP);
Rcpp::traits::input_parameter< int >::type gridNo(gridNoSEXP);
Rcpp::traits::input_parameter< SEXP >::type stateFile(stateFileSEXP);
Rcpp::traits::input_parameter< int >::type seed(seedSEXP);
Rcpp::traits::input_parameter< int >::type flag(flagSEXP);
Rcpp::traits::input_parameter< int >::type cuba_args(cuba_argsSEXP);
rcpp_result_gen = Rcpp::wrap(doVegas(nComp, f, nDim, nVec, minEval, maxEval, absTol, relTol, nStart, nIncrease, nBatch, gridNo, stateFile, seed, flag, cuba_args));
return rcpp_result_gen;
END_RCPP
}
// doSuave
Rcpp::List doSuave(int nComp, SEXP f, int nDim, int nVec, int minEval, int maxEval, double absTol, double relTol, int nNew, int nMin, double flatness, SEXP stateFile, int seed, int flag, int cuba_args);
RcppExport SEXP _cubature_doSuave(SEXP nCompSEXP, SEXP fSEXP, SEXP nDimSEXP, SEXP nVecSEXP, SEXP minEvalSEXP, SEXP maxEvalSEXP, SEXP absTolSEXP, SEXP relTolSEXP, SEXP nNewSEXP, SEXP nMinSEXP, SEXP flatnessSEXP, SEXP stateFileSEXP, SEXP seedSEXP, SEXP flagSEXP, SEXP cuba_argsSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type nComp(nCompSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< int >::type nDim(nDimSEXP);
Rcpp::traits::input_parameter< int >::type nVec(nVecSEXP);
Rcpp::traits::input_parameter< int >::type minEval(minEvalSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absTol(absTolSEXP);
Rcpp::traits::input_parameter< double >::type relTol(relTolSEXP);
Rcpp::traits::input_parameter< int >::type nNew(nNewSEXP);
Rcpp::traits::input_parameter< int >::type nMin(nMinSEXP);
Rcpp::traits::input_parameter< double >::type flatness(flatnessSEXP);
Rcpp::traits::input_parameter< SEXP >::type stateFile(stateFileSEXP);
Rcpp::traits::input_parameter< int >::type seed(seedSEXP);
Rcpp::traits::input_parameter< int >::type flag(flagSEXP);
Rcpp::traits::input_parameter< int >::type cuba_args(cuba_argsSEXP);
rcpp_result_gen = Rcpp::wrap(doSuave(nComp, f, nDim, nVec, minEval, maxEval, absTol, relTol, nNew, nMin, flatness, stateFile, seed, flag, cuba_args));
return rcpp_result_gen;
END_RCPP
}
// doDivonne
Rcpp::List doDivonne(int nComp, SEXP f, int nDim, int nVec, int minEval, int maxEval, double absTol, double relTol, int key1, int key2, int key3, int maxPass, double border, double maxChisq, double minDeviation, int nGiven, int ldxGiven, SEXP xGiven, int nExtra, SEXP peakFinder, SEXP stateFile, int seed, int flag, int cuba_args);
RcppExport SEXP _cubature_doDivonne(SEXP nCompSEXP, SEXP fSEXP, SEXP nDimSEXP, SEXP nVecSEXP, SEXP minEvalSEXP, SEXP maxEvalSEXP, SEXP absTolSEXP, SEXP relTolSEXP, SEXP key1SEXP, SEXP key2SEXP, SEXP key3SEXP, SEXP maxPassSEXP, SEXP borderSEXP, SEXP maxChisqSEXP, SEXP minDeviationSEXP, SEXP nGivenSEXP, SEXP ldxGivenSEXP, SEXP xGivenSEXP, SEXP nExtraSEXP, SEXP peakFinderSEXP, SEXP stateFileSEXP, SEXP seedSEXP, SEXP flagSEXP, SEXP cuba_argsSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type nComp(nCompSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< int >::type nDim(nDimSEXP);
Rcpp::traits::input_parameter< int >::type nVec(nVecSEXP);
Rcpp::traits::input_parameter< int >::type minEval(minEvalSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absTol(absTolSEXP);
Rcpp::traits::input_parameter< double >::type relTol(relTolSEXP);
Rcpp::traits::input_parameter< int >::type key1(key1SEXP);
Rcpp::traits::input_parameter< int >::type key2(key2SEXP);
Rcpp::traits::input_parameter< int >::type key3(key3SEXP);
Rcpp::traits::input_parameter< int >::type maxPass(maxPassSEXP);
Rcpp::traits::input_parameter< double >::type border(borderSEXP);
Rcpp::traits::input_parameter< double >::type maxChisq(maxChisqSEXP);
Rcpp::traits::input_parameter< double >::type minDeviation(minDeviationSEXP);
Rcpp::traits::input_parameter< int >::type nGiven(nGivenSEXP);
Rcpp::traits::input_parameter< int >::type ldxGiven(ldxGivenSEXP);
Rcpp::traits::input_parameter< SEXP >::type xGiven(xGivenSEXP);
Rcpp::traits::input_parameter< int >::type nExtra(nExtraSEXP);
Rcpp::traits::input_parameter< SEXP >::type peakFinder(peakFinderSEXP);
Rcpp::traits::input_parameter< SEXP >::type stateFile(stateFileSEXP);
Rcpp::traits::input_parameter< int >::type seed(seedSEXP);
Rcpp::traits::input_parameter< int >::type flag(flagSEXP);
Rcpp::traits::input_parameter< int >::type cuba_args(cuba_argsSEXP);
rcpp_result_gen = Rcpp::wrap(doDivonne(nComp, f, nDim, nVec, minEval, maxEval, absTol, relTol, key1, key2, key3, maxPass, border, maxChisq, minDeviation, nGiven, ldxGiven, xGiven, nExtra, peakFinder, stateFile, seed, flag, cuba_args));
return rcpp_result_gen;
END_RCPP
}
// doHCubature
Rcpp::List doHCubature(int fDim, SEXP f, Rcpp::NumericVector xLL, Rcpp::NumericVector xUL, int maxEval, double absErr, double tol, int vectorInterface, unsigned norm);
RcppExport SEXP _cubature_doHCubature(SEXP fDimSEXP, SEXP fSEXP, SEXP xLLSEXP, SEXP xULSEXP, SEXP maxEvalSEXP, SEXP absErrSEXP, SEXP tolSEXP, SEXP vectorInterfaceSEXP, SEXP normSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type fDim(fDimSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< Rcpp::NumericVector >::type xLL(xLLSEXP);
Rcpp::traits::input_parameter< Rcpp::NumericVector >::type xUL(xULSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absErr(absErrSEXP);
Rcpp::traits::input_parameter< double >::type tol(tolSEXP);
Rcpp::traits::input_parameter< int >::type vectorInterface(vectorInterfaceSEXP);
Rcpp::traits::input_parameter< unsigned >::type norm(normSEXP);
rcpp_result_gen = Rcpp::wrap(doHCubature(fDim, f, xLL, xUL, maxEval, absErr, tol, vectorInterface, norm));
return rcpp_result_gen;
END_RCPP
}
// doPCubature
Rcpp::List doPCubature(int fDim, SEXP f, Rcpp::NumericVector xLL, Rcpp::NumericVector xUL, int maxEval, double absErr, double tol, int vectorInterface, unsigned norm);
RcppExport SEXP _cubature_doPCubature(SEXP fDimSEXP, SEXP fSEXP, SEXP xLLSEXP, SEXP xULSEXP, SEXP maxEvalSEXP, SEXP absErrSEXP, SEXP tolSEXP, SEXP vectorInterfaceSEXP, SEXP normSEXP) {
BEGIN_RCPP
Rcpp::RObject rcpp_result_gen;
Rcpp::RNGScope rcpp_rngScope_gen;
Rcpp::traits::input_parameter< int >::type fDim(fDimSEXP);
Rcpp::traits::input_parameter< SEXP >::type f(fSEXP);
Rcpp::traits::input_parameter< Rcpp::NumericVector >::type xLL(xLLSEXP);
Rcpp::traits::input_parameter< Rcpp::NumericVector >::type xUL(xULSEXP);
Rcpp::traits::input_parameter< int >::type maxEval(maxEvalSEXP);
Rcpp::traits::input_parameter< double >::type absErr(absErrSEXP);
Rcpp::traits::input_parameter< double >::type tol(tolSEXP);
Rcpp::traits::input_parameter< int >::type vectorInterface(vectorInterfaceSEXP);
Rcpp::traits::input_parameter< unsigned >::type norm(normSEXP);
rcpp_result_gen = Rcpp::wrap(doPCubature(fDim, f, xLL, xUL, maxEval, absErr, tol, vectorInterface, norm));
return rcpp_result_gen;
END_RCPP
}
|
