c_cpp Rcpp独特的套装

Posted 2021-05-14

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
NumericVector cpp_unique(NumericVector x) {
  return unique(x);
}


/*** R
r_vector <- c(3, 1, 2, 2, 3, 1)

cpp_unique(r_vector)
#> [1] 2 3 1
*/