https://github.com/cran/cutpointr
Tip revision: 030e7096a6bb7c391a35b49ac6eea87ad3b6027a authored by Christian Thiele on 17 September 2019, 20:30:02 UTC
version 1.0.0
version 1.0.0
Tip revision: 030e709
any_inf.cpp
#include <Rcpp.h>
using namespace Rcpp;
// [[Rcpp::export]]
bool any_inf(NumericVector x) {
int len = x.size();
for(int i=0; i<len; i++){
if (!(std::isfinite(x[i]))) return true;
}
return false;
}