R/utils.R

## * Various utility functions
## ** Log Sum exp
.logsumexp_R <- function(x, ...) {
    max_x <- max(x, ...)
    max_x + log(sum(exp(x - max_x)))
}
IshmaelBelghazi/gpuClassifieR documentation built on May 7, 2019, 6:45 a.m.