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

visit type

Tip revision: bbfd8290a255cf1d55a1eed28f5501736e754842 authored by Christian Thiele on 14 April 2020, 07:50:10 UTC
version 1.0.2

Tip revision: bbfd829

get_rev_dups.cpp

#include <Rcpp.h>
using namespace Rcpp;

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