Revision d461e559d4a76b7fcbd728470ca12cce56d3ffab authored by Christian Thiele on 19 June 2020, 11:00:06 UTC, committed by cran-robot on 19 June 2020, 11:00:06 UTC
1 parent bbfd829
Raw File
is_equal_cpp.cpp
#include <Rcpp.h>
using namespace Rcpp;

// [[Rcpp::export]]
LogicalVector is_equal_cpp_char(CharacterVector x, String y){
    Rcpp::LogicalVector r(x.size());
    for(int i=0; i<x.size(); i++){
        r[i] = (x[i] == y);
    }
    return(r);
}

// [[Rcpp::export]]
LogicalVector is_equal_cpp_num(NumericVector x, double y){
    Rcpp::LogicalVector r(x.size());
    for(int i=0; i<x.size(); i++){
        r[i] = (x[i] == y);
    }
    return(r);
}
back to top