Nothing
R/logmeanexp.R
In pomp: Statistical Inference for Partially Observed Markov Processes
logmeanexp <- function (x, se = FALSE) {
mx <- max(x)
mean <- mx+log(mean(exp(x-mx)))
if (se) {
se <- sd(exp(x-mx))/exp(mean-mx)
c(mean,se=se)
} else {
mean
}
}
Try the pomp package in your browser
Any scripts or data that you put into this service are public.
pomp documentation built on May 2, 2019, 4:09 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
logmeanexp <- function (x, se = FALSE) {
mx <- max(x)
mean <- mx+log(mean(exp(x-mx)))
if (se) {
se <- sd(exp(x-mx))/exp(mean-mx)
c(mean,se=se)
} else {
mean
}
}
Try the pomp package in your browser
Any scripts or data that you put into this service are public.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.