Weights for tolerance and toxicity events using linear function of time

Source: R/linear_tolerance_weight.R

Weights for tolerance and toxicity events using linear function of time

linear_follow_up_weight(
  now_time,
  recruited_time,
  tox,
  max_time,
  tox_has_weight_1 = TRUE
)

Arguments

now_time

the time now

recruited_time

vector of recruitment times for patients

tox

integer vector of toxicity variables for patients, 1 means tox

max_time

the maximum window of evaluation for

tox_has_weight_1

logical, TRUE to set the weight for tox to 1 identically

Value

numerical vector of weights

Examples

linear_follow_up_weight(
  now_time = 10,
  recruited_time = 4:7,
  tox = c(0, 0, 0, 1),
  max_time = 6,
  tox_has_weight_1 = TRUE
)
#> [1] 1.0000000 0.8333333 0.6666667 1.0000000

linear_follow_up_weight(
  now_time = 10,
  recruited_time = 4:7,
  tox = c(0, 0, 0, 1),
  max_time = 6,
  tox_has_weight_1 = FALSE
)
#> [1] 1.0000000 0.8333333 0.6666667 0.5000000