-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy pathas.cpp
More file actions
39 lines (26 loc) · 1.09 KB
/
as.cpp
File metadata and controls
39 lines (26 loc) · 1.09 KB
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
#include <Rcpp.h>
using namespace Rcpp ;
// [[Rcpp::export]]
int as_int( SEXP x){ return as<int>( x ); }
// [[Rcpp::export]]
double as_double( SEXP x){ return as<double>( x ); }
// [[Rcpp::export]]
Rbyte as_raw( SEXP x){ return as<Rbyte>( x ); }
// [[Rcpp::export]]
bool as_bool( SEXP x){ return as<bool>( x ); }
// [[Rcpp::export]]
std::string as_string( SEXP x){ return as<std::string>( x ); }
// [[Rcpp::export]]
std::vector<int> as_vector_int( SEXP x){ return as< std::vector<int> >(x) ; }
// [[Rcpp::export]]
std::vector<double> as_vector_double( SEXP x){ return as< std::vector<double> >(x) ; }
// [[Rcpp::export]]
std::vector<Rbyte> as_vector_raw( SEXP x){ return as< std::vector<Rbyte> >(x) ; }
// [[Rcpp::export]]
std::vector<bool> as_vector_bool( SEXP x){ return as< std::vector<bool> >(x) ; }
// [[Rcpp::export]]
std::vector<std::string> as_vector_string( SEXP x){ return as< std::vector<std::string> >(x) ; }
// [[Rcpp::export]]
std::deque<int> as_deque_int( SEXP x){ return as< std::deque<int> >(x) ; }
// [[Rcpp::export]]
std::list<int> as_list_int( SEXP x){ return as< std::list<int> >(x) ; }