param_norm {SBMSplitMerge}

Parameter model for Normal Model

Description

Normal parameter model: theta_0 = (mu0, sigma0) theta_k = (muk, sigmak)

Usage

param_norm(a0, a1, b0, b1, c0, c1, d0, d1)

Arguments

a0, a1

mu0 ~ Normal(a0,a1)

b0, b1

sig_0 ~ Gamma(b0,b1)

c0, c1

muk ~ Normal(c0, c1)

d0, d1

sig_k ~ Gamma(d0,d1)

Value

parammod representing Normal distributed parameters

Examples

## theta0 = (mu0, sigma0); mu0~Normal(0,5); sigma0 ~ Gamma(1,1);
## thetak = (muk, sigmak); muk~Normal(0,3); sigmak ~ Gamma(5,2);
pn <- param_norm(0,5,1,1,0,3,5,2)
pn$r(5) ## a draw with 5 within-block parameters