A step of the RcppExports implementation. Called by morie_mean.
See the file header for the source the module follows.
Arguments
- x
Passed to .Call.
- shared
Use the rmoriebricklayer kernel (TRUE) or the
identical kernel rmorie vendors (FALSE). Defaults to TRUE.
Value
The value of .Call.
Examples
x <- c(2, 4, 4, 4, 5, 5, 7, 9)
morie_mean_cpp(x)
#> [1] 5
morie_mean_cpp(x, shared = FALSE)
#> [1] 5
# neither kernel overflows where base R's mean() does not
morie_mean_cpp(rep(1e308, 3), shared = FALSE)
#> [1] 1e+308