View source: R/ebpm_point1_gamma.R
ebpm_point1_gamma | R Documentation |
Uses Empirical Bayes to fit the model
x_j | \lambda_j ~ Poi(s_j \lambda_j)
with
lambda_j ~ g()
with Point Gamma: g() = pi_0 delta_1() + (1-pi_0) gamma(shape, scale)
ebpm_point1_gamma(x, s = 1, g_init = NULL, fix_g = FALSE, control = NULL)
x |
vector of Poisson observations. |
s |
vector of scale factors for Poisson observations: the model is |
g_init |
The prior distribution |
fix_g |
If |
control |
A list of control parameters to be passed to the optimization function. 'nlm' is used. |
pi0 |
Either |
The model is fit in two stages: i) estimate g
by maximum likelihood (over pi_0, shape, scale)
ii) Compute posterior distributions for \lambda_j
given x_j,\hat{g}
.
A list containing elements:
posterior
A data frame of summary results (posterior means, and posterior log mean).
fitted_g
The fitted prior \hat{g}
of class point1_gamma
log_likelihood
The optimal log likelihood attained
L(\hat{g})
.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.