Description Usage Arguments Value Examples
package internal function
1 | hatpai.u(z, hk1, hk0, ph1, ph0, sigma1, sigma0, mu1, mu0, pai, H, n)
|
z |
|
hk1 |
|
hk0 |
|
ph1 |
|
ph0 |
|
sigma1 |
|
sigma0 |
|
mu1 |
|
mu0 |
|
pai |
|
H |
|
n |
value
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | pai = 0.5
M = 10
H = 10
K = 5
n = 100
z = abs(rnorm(n))
sigma1 = abs(rnorm(K))
sigma0 = abs(rnorm(K))
mu1 = abs(rnorm(K))
mu0 = abs(rnorm(K))
hk0 = matrix(sample(K, M*H, replace=TRUE), M, H)
hk1 = matrix(sample(K, M*H, replace=TRUE), M, H)
nu.h0 = lapply(1:H, function(x){rbeta(1,5,5)})
nu.h1 = lapply(1:H, function(x){rbeta(1,5,5)})
ph0 = lapply(nu.h0, lambda.u)
ph1 = lapply(nu.h1, lambda.u)
hatpai.u(z, hk1, hk0, ph1, ph0, sigma1, sigma0, mu1, mu0, pai, H, n)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.