Can anyone tell me about issues I have to look out for when dealing with Rcpp 
Functions and passing Armadillo objects as arguments? I'm getting "not 
compatible with INTSXP" and segfault errors when calling the following Rcpp 
equivalent of R's 'predict(loess(y~x, weights=w, span=span))'. The errors 
usually only manifest only after several dozen calls.

Davor


const vec predict(const vec& x, const vec& y,
                        const vec& weights, const double span) {
  Function formula_fn("formula");
  Function loess_fn("loess");
  Function predict_fn("predict");

  List data = List::create(_["x"] = wrap(x),
                           _["y"] = wrap(y));
  NumericVector weights_r = wrap(weights);
  const NumericVector out_r = predict_fn(loess_fn(formula_fn("y~x"),
                                                  data,
                                                  weights_r,
                                                  Named("span") = span));
  const vec out = vec(out_r.begin(), out_r.size());
  return out;
}
_______________________________________________
Rcpp-devel mailing list
[email protected]
https://lists.r-forge.r-project.org/cgi-bin/mailman/listinfo/rcpp-devel

Reply via email to