Content - 5ddd7617f09e42b0041cf67d9f174f1eed3bca25 - da13f07/src/get_rev_dups.cpp

visit type

Tip revision: 8883cb6d23c8c690e6eeb8a8d074a5508e76f3d7 authored by Christian Thiele on 27 March 2019, 09:10:03 UTC
version 0.7.6

Tip revision: 8883cb6

get_rev_dups.cpp

#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
LogicalVector get_rev_dups(NumericVector x) {
  return rev(duplicated(rev(x)));
}