weights_at_dose {trialr}

Get the weights of patient outcomes at the doses under investigation.

Description

Get the weights of patient outcomes at the doses under investigation.

Usage

weights_at_dose(x, dose, ...)

## Default S3 method:
weights_at_dose(x, dose = NULL, ...)

## S3 method for class 'crm_fit'
weights_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

list if dose omitted, numerical vector if dose provided.

Examples

## Not run: 
# CRM example
fit <- stan_crm(skeleton = c(0.1, 0.2, 0.35, 0.6), target = 0.2,
                model = 'empiric', beta_sd = sqrt(1.34), seed = 123,
                doses = c(1, 1, 2, 2, 2),
                tox   = c(0, 0, 0, 0, 0),
                weights = c(1, 1, 0.9, 0.1, 0.1))
l <- weights_at_dose(fit)

length(l)  # 4
l[[1]]  # c(1, 1)
l[[2]]  # c(0.9, 0.1, 0.1)
l[[3]]  # c()

weights_at_dose(fit, dose = 2)  # c(0.9, 0.1, 0.1)

## End(Not run)