| 60 | } |
| 61 | |
| 62 | SEXP eleToString(const Element& e) { |
| 63 | Rcpp::StringVector ans(e.numValues()); |
| 64 | for(size_t i = 0; i < e.numValues(); ++i) { |
| 65 | ans[i] = e.getValueAsString(i); |
| 66 | } |
| 67 | return Rcpp::wrap(ans); |
| 68 | } |
| 69 | |
| 70 | SEXP eleToDouble(const Element& e) { |
| 71 | Rcpp::NumericVector ans(e.numValues()); |
no outgoing calls
no test coverage detected