TRANSLATING MODEL 'schools_code' FROM Stan CODE TO C++ CODE NOW.
COMPILING THE C++ CODE FOR MODEL 'schools_code' NOW.
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h: In copy constructor ‘Rcpp::S4_field<Class>::S4_field(const Rcpp::S4_field<Class>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’:
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/module/class.h:416: instantiated from ‘Rcpp::List Rcpp::class_<Class>::fields(const Rcpp::XPtr<Rcpp::class_Base, Rcpp::PreserveStorage, void Rcpp::standard_delete_finalizer [with T = Rcpp::class_Base]>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’
file7ae563151ca0.cpp:517: instantiated from here
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h:331: error: no matching function for call to ‘Rcpp::Reference_Impl<Rcpp::PreserveStorage>::Reference_Impl()’
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:56: note: candidates are: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const std::string&) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:41: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(SEXPREC*) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:34: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const Rcpp::Reference_Impl<StoragePolicy>&) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h: In copy constructor ‘Rcpp::S4_CppOverloadedMethods<Class>::S4_CppOverloadedMethods(const Rcpp::S4_CppOverloadedMethods<Class>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’:
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/module/class.h:435: instantiated from ‘Rcpp::List Rcpp::class_<Class>::getMethods(const Rcpp::XPtr<Rcpp::class_Base, Rcpp::PreserveStorage, void Rcpp::standard_delete_finalizer [with T = Rcpp::class_Base]>&, std::string&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’
file7ae563151ca0.cpp:517: instantiated from here
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h:256: error: no matching function for call to ‘Rcpp::Reference_Impl<Rcpp::PreserveStorage>::Reference_Impl()’
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:56: note: candidates are: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const std::string&) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:41: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(SEXPREC*) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:34: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const Rcpp::Reference_Impl<StoragePolicy>&) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h: In copy constructor ‘Rcpp::S4_CppConstructor<Class>::S4_CppConstructor(const Rcpp::S4_CppConstructor<Class>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’:
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/module/class.h:446: instantiated from ‘Rcpp::List Rcpp::class_<Class>::getConstructors(const Rcpp::XPtr<Rcpp::class_Base, Rcpp::PreserveStorage, void Rcpp::standard_delete_finalizer [with T = Rcpp::class_Base]>&, std::string&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’
file7ae563151ca0.cpp:517: instantiated from here
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h:218: error: no matching function for call to ‘Rcpp::Reference_Impl<Rcpp::PreserveStorage>::Reference_Impl()’
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:56: note: candidates are: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const std::string&) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:41: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(SEXPREC*) [with StoragePolicy = Rcpp::PreserveStorage]
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Reference.h:34: note: Rcpp::Reference_Impl<StoragePolicy>::Reference_Impl(const Rcpp::Reference_Impl<StoragePolicy>&) [with StoragePolicy = Rcpp::PreserveStorage]
make: *** [file7ae563151ca0.o] Error 1
ERROR(s) during compilation: source code errors or compiler configuration errors!
Program source:
1:
2: // includes from the plugin
3:
4:
5: // user includes
6: // Code generated by Stan version 2.1
7:
8: #include <stan/model/model_header.hpp>
9:
10: namespace model7ae53a022620_schools_code_namespace {
11:
12: using std::vector;
13: using std::string;
14: using std::stringstream;
15: using stan::model::prob_grad;
16: using stan::math::get_base1;
17: using stan::math::initialize;
18: using stan::math::stan_print;
19: using stan::math::lgamma;
20: using stan::io::dump;
21: using std::istream;
22: using namespace stan::math;
23: using namespace stan::prob;
24:
25: typedef Eigen::Matrix<double,Eigen::Dynamic,1> vector_d;
26: typedef Eigen::Matrix<double,1,Eigen::Dynamic> row_vector_d;
27: typedef Eigen::Matrix<double,Eigen::Dynamic,Eigen::Dynamic> matrix_d;
28:
29: class model7ae53a022620_schools_code : public prob_grad {
30: private:
31: int J;
32: vector<double> y;
33: vector<double> sigma;
34: public:
35: model7ae53a022620_schools_code(stan::io::var_context& context__,
36: std::ostream* pstream__ = 0)
37: : prob_grad::prob_grad(0) {
38: static const char* function__ = "model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code(%1%)";
39: (void) function__; // dummy call to supress warning
40: size_t pos__;
41: (void) pos__; // dummy call to supress warning
42: std::vector<int> vals_i__;
43: std::vector<double> vals_r__;
44: context__.validate_dims("data initialization", "J", "int", context__.to_vec());
45: J = int(0);
46: vals_i__ = context__.vals_i("J");
47: pos__ = 0;
48: J = vals_i__[pos__++];
49: context__.validate_dims("data initialization", "y", "double", context__.to_vec(J));
50: stan::math::validate_non_negative_index("y", "J", J);
51: y = std::vector<double>(J,double(0));
52: vals_r__ = context__.vals_r("y");
53: pos__ = 0;
54: size_t y_limit_0__ = J;
55: for (size_t i_0__ = 0; i_0__ < y_limit_0__; ++i_0__) {
56: y[i_0__] = vals_r__[pos__++];
57: }
58: context__.validate_dims("data initialization", "sigma", "double", context__.to_vec(J));
59: stan::math::validate_non_negative_index("sigma", "J", J);
60: sigma = std::vector<double>(J,double(0));
61: vals_r__ = context__.vals_r("sigma");
62: pos__ = 0;
63: size_t sigma_limit_0__ = J;
64: for (size_t i_0__ = 0; i_0__ < sigma_limit_0__; ++i_0__) {
65: sigma[i_0__] = vals_r__[pos__++];
66: }
67:
68: // validate data
69: try {
70: check_greater_or_equal(function__,J,0,"J");
71: } catch (std::domain_error& e) {
72: throw std::domain_error(std::string("Invalid value of J: ") + std::string(e.what()));
73: };
74: for (int k0__ = 0; k0__ < J; ++k0__) {
75: try {
76: check_greater_or_equal(function__,sigma[k0__],0,"sigma[k0__]");
77: } catch (std::domain_error& e) {
78: throw std::domain_error(std::string("Invalid value of sigma: ") + std::string(e.what()));
79: };
80: }
81:
82:
83: // validate transformed data
84:
85: // set parameter ranges
86: num_params_r__ = 0U;
87: param_ranges_i__.clear();
88: ++num_params_r__;
89: ++num_params_r__;
90: num_params_r__ += J;
91: }
92:
93: ~model7ae53a022620_schools_code() { }
94:
95:
96: void transform_inits(const stan::io::var_context& context__,
97: std::vector<int>& params_i__,
98: std::vector<double>& params_r__) const {
99: stan::io::writer<double> writer__(params_r__,params_i__);
100: size_t pos__;
101: (void) pos__; // dummy call to supress warning
102: std::vector<double> vals_r__;
103: std::vector<int> vals_i__;
104:
105:
106: if (!(context__.contains_r("mu")))
107: throw std::runtime_error("variable mu missing");
108: vals_r__ = context__.vals_r("mu");
109: pos__ = 0U;
110: context__.validate_dims("initialization", "mu", "double", context__.to_vec());
111: double mu(0);
112: mu = vals_r__[pos__++];
113: try { writer__.scalar_unconstrain(mu); } catch (std::exception& e) { throw std::runtime_error(std::string("Error transforming variable mu: ") + e.what()); }
114:
115: if (!(context__.contains_r("tau")))
116: throw std::runtime_error("variable tau missing");
117: vals_r__ = context__.vals_r("tau");
118: pos__ = 0U;
119: context__.validate_dims("initialization", "tau", "double", context__.to_vec());
120: double tau(0);
121: tau = vals_r__[pos__++];
122: try { writer__.scalar_lb_unconstrain(0,tau); } catch (std::exception& e) { throw std::runtime_error(std::string("Error transforming variable tau: ") + e.what()); }
123:
124: if (!(context__.contains_r("eta")))
125: throw std::runtime_error("variable eta missing");
126: vals_r__ = context__.vals_r("eta");
127: pos__ = 0U;
128: context__.validate_dims("initialization", "eta", "double", context__.to_vec(J));
129: std::vector<double> eta(J,double(0));
130: for (int i0__ = 0U; i0__ < J; ++i0__)
131: eta[i0__] = vals_r__[pos__++];
132: for (int i0__ = 0U; i0__ < J; ++i0__)
133: try { writer__.scalar_unconstrain(eta[i0__]); } catch (std::exception& e) { throw std::runtime_error(std::string("Error transforming variable eta: ") + e.what()); }
134: params_r__ = writer__.data_r();
135: params_i__ = writer__.data_i();
136: }
137:
138: void transform_inits(const stan::io::var_context& context,
139: Eigen::Matrix<double,Eigen::Dynamic,1>& params_r) const {
140: std::vector<double> params_r_vec;
141: std::vector<int> params_i_vec;
142: transform_inits(context, params_i_vec, params_r_vec);
143: params_r.resize(params_r_vec.size());
144: for (int i = 0; i < params_r.size(); ++i)
145: params_r(i) = params_r_vec[i];
146: }
147:
148:
149: template <bool propto__, bool jacobian__, typename T__>
150: T__ log_prob(vector<T__>& params_r__,
151: vector<int>& params_i__,
152: std::ostream* pstream__ = 0) const {
153:
154: T__ DUMMY_VAR__(std::numeric_limits<double>::quiet_NaN());
155: (void) DUMMY_VAR__; // suppress unused var warning
156:
157: T__ lp__(0.0);
158: stan::math::accumulator<T__> lp_accum__;
159:
160: // model parameters
161: stan::io::reader<T__> in__(params_r__,params_i__);
162:
163: T__ mu;
164: (void) mu; // dummy to suppress unused var warning
165: if (jacobian__)
166: mu = in__.scalar_constrain(lp__);
167: else
168: mu = in__.scalar_constrain();
169:
170: T__ tau;
171: (void) tau; // dummy to suppress unused var warning
172: if (jacobian__)
173: tau = in__.scalar_lb_constrain(0,lp__);
174: else
175: tau = in__.scalar_lb_constrain(0);
176:
177: vector<T__> eta;
178: size_t dim_eta_0__ = J;
179: eta.reserve(dim_eta_0__);
180: for (size_t k_0__ = 0; k_0__ < dim_eta_0__; ++k_0__) {
181: if (jacobian__)
182: eta.push_back(in__.scalar_constrain(lp__));
183: else
184: eta.push_back(in__.scalar_constrain());
185: }
186:
187:
188: // transformed parameters
189: vector<T__> theta(J);
190:
191: // initialized transformed params to avoid seg fault on val access
192: stan::math::fill(theta,DUMMY_VAR__);
193:
194: for (int j = 1; j <= J; ++j) {
195: stan::math::assign(get_base1_lhs(theta,j,"theta",1), (mu + (tau * get_base1(eta,j,"eta",1))));
196: }
197:
198: // validate transformed parameters
199: for (int i0__ = 0; i0__ < J; ++i0__) {
200: if (stan::math::is_uninitialized(theta[i0__])) {
201: std::stringstream msg__;
202: msg__ << "Undefined transformed parameter: theta" << '[' << i0__ << ']';
203: throw std::runtime_error(msg__.str());
204: }
205: }
206:
207: const char* function__ = "validate transformed params %1%";
208: (void) function__; // dummy to suppress unused var warning
209: // model body
210: lp_accum__.add(normal_log<propto__>(eta, 0, 1));
211: lp_accum__.add(normal_log<propto__>(y, theta, sigma));
212:
213: lp_accum__.add(lp__);
214: return lp_accum__.sum();
215:
216: } // log_prob()
217:
218: template <bool propto, bool jacobian, typename T>
219: T log_prob(Eigen::Matrix<T,Eigen::Dynamic,1>& params_r,
220: std::ostream* pstream = 0) const {
221: std::vector<T> vec_params_r;
222: vec_params_r.reserve(params_r.size());
223: for (int i = 0; i < params_r.size(); ++i)
224: vec_params_r.push_back(params_r(i));
225: std::vector<int> vec_params_i;
226: return log_prob<propto,jacobian,T>(vec_params_r, vec_params_i, pstream);
227: }
228:
229:
230: void get_param_names(std::vector<std::string>& names__) const {
231: names__.resize(0);
232: names__.push_back("mu");
233: names__.push_back("tau");
234: names__.push_back("eta");
235: names__.push_back("theta");
236: }
237:
238:
239: void get_dims(std::vector<std::vector<size_t> >& dimss__) const {
240: dimss__.resize(0);
241: std::vector<size_t> dims__;
242: dims__.resize(0);
243: dimss__.push_back(dims__);
244: dims__.resize(0);
245: dimss__.push_back(dims__);
246: dims__.resize(0);
247: dims__.push_back(J);
248: dimss__.push_back(dims__);
249: dims__.resize(0);
250: dims__.push_back(J);
251: dimss__.push_back(dims__);
252: }
253:
254: template <typename RNG>
255: void write_array(RNG& base_rng__,
256: std::vector<double>& params_r__,
257: std::vector<int>& params_i__,
258: std::vector<double>& vars__,
259: bool include_tparams__ = true,
260: bool include_gqs__ = true,
261: std::ostream* pstream__ = 0) const {
262: vars__.resize(0);
263: stan::io::reader<double> in__(params_r__,params_i__);
264: static const char* function__ = "model7ae53a022620_schools_code_namespace::write_array(%1%)";
265: (void) function__; // dummy call to supress warning
266: // read-transform, write parameters
267: double mu = in__.scalar_constrain();
268: double tau = in__.scalar_lb_constrain(0);
269: vector<double> eta;
270: size_t dim_eta_0__ = J;
271: for (size_t k_0__ = 0; k_0__ < dim_eta_0__; ++k_0__) {
272: eta.push_back(in__.scalar_constrain());
273: }
274: vars__.push_back(mu);
275: vars__.push_back(tau);
276: for (int k_0__ = 0; k_0__ < J; ++k_0__) {
277: vars__.push_back(eta[k_0__]);
278: }
279:
280: if (!include_tparams__) return;
281: // declare and define transformed parameters
282: double lp__ = 0.0;
283: (void) lp__; // dummy call to supress warning
284: stan::math::accumulator<double> lp_accum__;
285:
286: vector<double> theta(J, 0.0);
287:
288: for (int j = 1; j <= J; ++j) {
289: stan::math::assign(get_base1_lhs(theta,j,"theta",1), (mu + (tau * get_base1(eta,j,"eta",1))));
290: }
291:
292: // validate transformed parameters
293:
294: // write transformed parameters
295: for (int k_0__ = 0; k_0__ < J; ++k_0__) {
296: vars__.push_back(theta[k_0__]);
297: }
298:
299: if (!include_gqs__) return;
300: // declare and define generated quantities
301:
302:
303: // validate generated quantities
304:
305: // write generated quantities
306: }
307:
308: template <typename RNG>
309: void write_array(RNG& base_rng,
310: Eigen::Matrix<double,Eigen::Dynamic,1>& params_r,
311: Eigen::Matrix<double,Eigen::Dynamic,1>& vars,
312: bool include_tparams = true,
313: bool include_gqs = true,
314: std::ostream* pstream = 0) const {
315: std::vector<double> params_r_vec(params_r.size());
316: for (int i = 0; i < params_r.size(); ++i)
317: params_r_vec[i] = params_r(i);
318: std::vector<double> vars_vec;
319: std::vector<int> params_i_vec;
320: write_array(base_rng,params_r_vec,params_i_vec,vars_vec,include_tparams,include_gqs,pstream);
321: vars.resize(vars_vec.size());
322: for (int i = 0; i < vars.size(); ++i)
323: vars(i) = vars_vec[i];
324: }
325:
326:
327: void write_csv_header(std::ostream& o__) const {
328: stan::io::csv_writer writer__(o__);
329: writer__.comma();
330: o__ << "mu";
331: writer__.comma();
332: o__ << "tau";
333: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
334: writer__.comma();
335: o__ << "eta" << '.' << k_0__;
336: }
337: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
338: writer__.comma();
339: o__ << "theta" << '.' << k_0__;
340: }
341: writer__.newline();
342: }
343:
344: template <typename RNG>
345: void write_csv(RNG& base_rng__,
346: std::vector<double>& params_r__,
347: std::vector<int>& params_i__,
348: std::ostream& o__,
349: std::ostream* pstream__ = 0) const {
350: stan::io::reader<double> in__(params_r__,params_i__);
351: stan::io::csv_writer writer__(o__);
352: static const char* function__ = "model7ae53a022620_schools_code_namespace::write_csv(%1%)";
353: (void) function__; // dummy call to supress warning
354: // read-transform, write parameters
355: double mu = in__.scalar_constrain();
356: writer__.write(mu);
357: double tau = in__.scalar_lb_constrain(0);
358: writer__.write(tau);
359: vector<double> eta;
360: size_t dim_eta_0__ = J;
361: for (size_t k_0__ = 0; k_0__ < dim_eta_0__; ++k_0__) {
362: eta.push_back(in__.scalar_constrain());
363: writer__.write(eta[k_0__]);
364: }
365:
366: // declare, define and validate transformed parameters
367: double lp__ = 0.0;
368: (void) lp__; // dummy call to supress warning
369: stan::math::accumulator<double> lp_accum__;
370:
371: vector<double> theta(J, 0.0);
372:
373: for (int j = 1; j <= J; ++j) {
374: stan::math::assign(get_base1_lhs(theta,j,"theta",1), (mu + (tau * get_base1(eta,j,"eta",1))));
375: }
376:
377:
378: // write transformed parameters
379: for (int k_0__ = 0; k_0__ < J; ++k_0__) {
380: writer__.write(theta[k_0__]);
381: }
382:
383: // declare and define generated quantities
384:
385:
386: // validate generated quantities
387:
388: // write generated quantities
389: writer__.newline();
390: }
391:
392: template <typename RNG>
393: void write_csv(RNG& base_rng,
394: Eigen::Matrix<double,Eigen::Dynamic,1>& params_r,
395: std::ostream& o,
396: std::ostream* pstream = 0) const {
397: std::vector<double> params_r_vec(params_r.size());
398: for (int i = 0; i < params_r.size(); ++i)
399: params_r_vec[i] = params_r(i);
400: std::vector<int> params_i_vec; // dummy
401: write_csv(base_rng, params_r_vec, params_i_vec, o, pstream);
402: }
403:
404: static std::string model_name() {
405: return "model7ae53a022620_schools_code";
406: }
407:
408:
409: void constrained_param_names(std::vector<std::string>& param_names__,
410: bool include_tparams__ = true,
411: bool include_gqs__ = true) const {
412: std::stringstream param_name_stream__;
413: param_name_stream__.str(std::string());
414: param_name_stream__ << "mu";
415: param_names__.push_back(param_name_stream__.str());
416: param_name_stream__.str(std::string());
417: param_name_stream__ << "tau";
418: param_names__.push_back(param_name_stream__.str());
419: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
420: param_name_stream__.str(std::string());
421: param_name_stream__ << "eta" << '.' << k_0__;
422: param_names__.push_back(param_name_stream__.str());
423: }
424:
425: if (!include_gqs__ && !include_tparams__) return;
426: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
427: param_name_stream__.str(std::string());
428: param_name_stream__ << "theta" << '.' << k_0__;
429: param_names__.push_back(param_name_stream__.str());
430: }
431:
432: if (!include_gqs__) return;
433: }
434:
435:
436: void unconstrained_param_names(std::vector<std::string>& param_names__,
437: bool include_tparams__ = true,
438: bool include_gqs__ = true) const {
439: std::stringstream param_name_stream__;
440: param_name_stream__.str(std::string());
441: param_name_stream__ << "mu";
442: param_names__.push_back(param_name_stream__.str());
443: param_name_stream__.str(std::string());
444: param_name_stream__ << "tau";
445: param_names__.push_back(param_name_stream__.str());
446: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
447: param_name_stream__.str(std::string());
448: param_name_stream__ << "eta" << '.' << k_0__;
449: param_names__.push_back(param_name_stream__.str());
450: }
451:
452: if (!include_gqs__ && !include_tparams__) return;
453: for (int k_0__ = 1; k_0__ <= J; ++k_0__) {
454: param_name_stream__.str(std::string());
455: param_name_stream__ << "theta" << '.' << k_0__;
456: param_names__.push_back(param_name_stream__.str());
457: }
458:
459: if (!include_gqs__) return;
460: }
461:
462: }; // model
463:
464: } // namespace
465:
466: #include <rstan/rstaninc.hpp>
467: /**
468: * Define Rcpp Module to expose stan_fit's functions to R.
469: */
470: RCPP_MODULE(stan_fit4model7ae53a022620_schools_code_mod){
471: Rcpp::class_<rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code,
472: boost::random::ecuyer1988> >("stan_fit4model7ae53a022620_schools_code")
473: // .constructor<Rcpp::List>()
474: .constructor<SEXP, SEXP>()
475: // .constructor<SEXP, SEXP>()
476: .method("call_sampler",
477: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::call_sampler)
478: .method("param_names",
479: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_names)
480: .method("param_names_oi",
481: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_names_oi)
482: .method("param_fnames_oi",
483: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_fnames_oi)
484: .method("param_dims",
485: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_dims)
486: .method("param_dims_oi",
487: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_dims_oi)
488: .method("update_param_oi",
489: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::update_param_oi)
490: .method("param_oi_tidx",
491: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::param_oi_tidx)
492: .method("grad_log_prob",
493: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::grad_log_prob)
494: .method("log_prob",
495: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::log_prob)
496: .method("unconstrain_pars",
497: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::unconstrain_pars)
498: .method("constrain_pars",
499: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::constrain_pars)
500: .method("num_pars_unconstrained",
501: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::num_pars_unconstrained)
502: .method("unconstrained_param_names",
503: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::unconstrained_param_names)
504: .method("constrained_param_names",
505: &rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::ecuyer1988>::constrained_param_names)
506: ;
507: }
508:
509: // declarations
510: extern "C" {
511: SEXP file7ae563151ca0( ) ;
512: }
513:
514: // definition
515:
516: SEXP file7ae563151ca0( ){
517: return Rcpp::wrap("schools_code");
518: }
519:
520:
Error in compileCode(f, code, language = language, verbose = verbose) :
Compilation ERROR, function(s)/method(s) not created! /Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/Module.h: In copy constructor ‘Rcpp::S4_field<Class>::S4_field(const Rcpp::S4_field<Class>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random::linear_congruential_engine<unsigned int, 40014u, 0u, 2147483563u>, boost::random::linear_congruential_engine<unsigned int, 40692u, 0u, 2147483399u> > >]’:
/Library/Frameworks/R.framework/Versions/3.0/Resources/library/Rcpp/include/Rcpp/module/class.h:416: instantiated from ‘Rcpp::List Rcpp::class_<Class>::fields(const Rcpp::XPtr<Rcpp::class_Base, Rcpp::PreserveStorage, void Rcpp::standard_delete_finalizer [with T = Rcpp::class_Base]>&) [with Class = rstan::stan_fit<model7ae53a022620_schools_code_namespace::model7ae53a022620_schools_code, boost::random::additive_combine_engine<boost::random
In addition: Warning message:
running command '/Library/Frameworks/R.framework/Resources/bin/R CMD SHLIB file7ae563151ca0.cpp 2> file7ae563151ca0.cpp.err.txt' had status 1