Get the Prob(Tox) for Prob(Eff) and utility pairs

Source: R/efftox_get_tox.R

Get the probability of toxicity for probability-of-efficacy and utility pairs

efftox_get_tox(eff, util, p, eff0, tox1)

Arguments

eff

Probability of efficacy; number between 0 and 1
util

Utility score; number
p

p-index of EffTox utility contours. Use efftox_solve_p
eff0

Efficacy probability required when toxicity is impossible; a number between 0 and 1
tox1

Toxicity probability permitted when efficacy is guaranteed; a number between 0 and 1

Value

Probability(s) of toxicity

Note

Various ways of vectorising the function are demonstrated in the examples

See also

efftox_solve_p

Examples

p <- efftox_solve_p(0.5, 0.65, 0.7, 0.25)

prob_tox <- efftox_get_tox(0.7, 0, p, eff0 = 0.5, tox1 = 0.65)
round(prob_tox, 2) == 0.25
#> [1] TRUE

prob_tox <- efftox_get_tox(0.7, seq(-0.5, 0.25, by = 0.25), p, eff0 = 0.5,
                           tox1 = 0.65)
round(prob_tox, 2) == c(0.57, 0.41, 0.25, 0.09)
#> [1] TRUE TRUE TRUE TRUE

prob_tox <- efftox_get_tox(c(0.5, 0.7, 0.8), 0.25, p, eff0 = 0.5, tox1 = 0.65)
round(prob_tox, 2) == c(NaN, 0.09, 0.22)
#> [1]   NA TRUE TRUE

prob_tox <- efftox_get_tox(c(0.5, 0.7, 0.8), c(-1, 0, 1), p, eff0 = 0.5,
                           tox1 = 0.65)
round(prob_tox, 2) == c(0.63, 0.25, NaN)
#> [1] TRUE TRUE   NA