[[Rcpp::export]]
| 214 | |
| 215 | // [[Rcpp::export]] |
| 216 | List runit_Row_Column_sugar( NumericMatrix x){ |
| 217 | NumericVector r0 = x.row(0) ; |
| 218 | NumericVector c0 = x.column(0) ; |
| 219 | return List::create( |
| 220 | r0, |
| 221 | c0, |
| 222 | x.row(1), |
| 223 | x.column(1), |
| 224 | x.row(1) + x.column(1) |
| 225 | ) ; |
| 226 | } |
| 227 | |
| 228 | // [[Rcpp::export]] |
| 229 | NumericMatrix runit_NumericMatrix_colsum( NumericMatrix input ){ |