[[Rcpp::export( rng = false )]]
| 35 | |
| 36 | // [[Rcpp::export( rng = false )]] |
| 37 | List test_rng_false(List x, bool verbose) { |
| 38 | if(x.size() > 0) { |
| 39 | CharacterVector first_element = x[0]; |
| 40 | return List::create(first_element, verbose); |
| 41 | } else { |
| 42 | return List::create(verbose); |
| 43 | } |
| 44 | } |
| 45 | |
| 46 | // [[Rcpp::export( rng = true )]] |
| 47 | List test_rng_true(List x, bool verbose) { |