R/logmeanexp.R

In brt: Biological Relevance Testing

Defines functions logmeanexp

Documented in logmeanexp

# vim: set noexpandtab tabstop=2:
#' Mean of Numbers in Log-Scale
#'
#' Mean of Numbers in Log-Scale
#'
#' @param x a numeric vector
#' @keywords math
logmeanexp=function(x) {
	mx=max(x)
	log(mean(exp(x-mx)))+mx
}

Try the brt package in your browser