R/RcppExports.R

In nicholaelaw/LFUtility: Tools for LF Data Job

# Generated by using Rcpp::compileAttributes() -> do not edit by hand
# Generator token: 10BE3573-1514-4C36-9D1C-5A225CD40393

#' Determine if a vector has identical elements
#'
#' @param X Numerical vector
#' @param Y Tolerance for pairwise comparison Default is 1e-6.
#' @export elementsAllEqual
elementsAllEqual <- function(X, Y = 1e-6) {
    .Call(`_LFUtility_elementsAllEqual`, X, Y)
}

#' Flip a string using keys
#'
#' @param STR String vector to be flipped.
flipStr <- function(STR) {
    .Call(`_LFUtility_flipStr`, STR)
}