Description Usage Arguments Examples
Retrieve the basket names in an exchangeability model.
1 | basket_name(model)
|
model |
the model to retrieve the basket names of |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | # 3 baskets, each with enrollement size 5
trial_sizes <- rep(5, 3)
# The response rates for the baskets.
resp_rate <- 0.15
# The trials: a column of the number of responses and a column of the
# the size of each trial.
trials <- data.frame(
responses = rbinom(trial_sizes, trial_sizes, resp_rate),
size = trial_sizes,
name = paste("Basket", seq_len(3))
)
basket_name(mem_mcmc(trials$responses, trials$size, trials$basket))
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.