[[Rcpp::export]]
| 152 | |
| 153 | // [[Rcpp::export]] |
| 154 | NumericVector runit_diff_ifelse( LogicalVector pred, NumericVector xx, NumericVector yy){ |
| 155 | NumericVector res = ifelse( pred, diff(xx), diff(yy) ); |
| 156 | return res ; |
| 157 | } |
| 158 | |
| 159 | // [[Rcpp::export]] |
| 160 | List runit_exp( NumericVector xx, IntegerVector yy ){ |