https://github.com/cran/cutpointr
Tip revision: 6f8c69d8a65a4dfa6a700d55adc8f44703f15e00 authored by Christian Thiele on 13 June 2025, 13:20:02 UTC
version 1.2.1
version 1.2.1
Tip revision: 6f8c69d
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);
}
