calc_evsi {dampack}  R Documentation 
Calculate Expected Value of Sample Information (EVSI)
calc_evsi(
psa,
wtp,
params = NULL,
outcome = c("nhb", "nmb"),
k = 1,
n = 100,
n0 = 10,
n_by_param = FALSE,
pop = 1,
progress = TRUE
)
psa 
object of class psa, produced by 
wtp 
willingnesstopay threshold 
params 
A vector of parameter names to be analyzed in terms of EVPPI. 
outcome 
either net monetary benefit ( 
k 
basis dimension, if 
n 
additional sample size 
n0 
initial sample size 
n_by_param 
if 
pop 
scalar that corresponds to the total population 
progress 

A list containing 1) a data.frame with WTP thresholds, new prospective sample sizes
(if n_by_param == FALSE
), and corresponding EVSIs
for the selected parameters and 2) a list of metamodels used to estimate EVSI for each
strategy at each willingness to pay threshold.