| 76 | } |
| 77 | |
| 78 | SEXP eleToInt(const Element& e) { |
| 79 | Rcpp::IntegerVector ans(e.numValues()); |
| 80 | for(size_t i = 0; i < e.numValues(); ++i) { |
| 81 | ans[i] = e.getValueAsInt32(i); |
| 82 | } |
| 83 | return Rcpp::wrap(ans); |
| 84 | } |
| 85 | |
| 86 | SEXP eleToDate(const Element& e) { |
| 87 | Rcpp::DateVector ans(e.numValues()); |