Get the number of toxicity events seen at the doses under investigation.

tox_at_dose(x, dose, ...)

# S3 method for dose_finding_fit
tox_at_dose(x, dose = NULL, ...)

Arguments

x	An R object of class `"dose_finding_fit"`
dose	Optional integer, at which dose-level? Omit to get data on all doses.
...	arguments passed to other methods

Value

integer vector

Examples

if (FALSE) {
# CRM example
target <- 0.2
fit <- stan_crm('1N 2N 3T', skeleton = c(0.1, 0.2, 0.35, 0.6),
                 target = target, model = 'empiric', beta_sd = sqrt(1.34),
                 seed = 123)
tox_at_dose(fit)            # c(0, 0, 1, 0)
tox_at_dose(fit, dose = 3)  # 1
}