Calculate the expected value of sample information from a decision-analytic model
Source:R/evsi.R
evsi.RdCalculate the expected value of sample information from a decision-analytic model
Usage
evsi(
outputs,
inputs,
study = NULL,
datagen_fn = NULL,
pars = NULL,
pars_datagen = NULL,
n = 100,
aux_pars = NULL,
method = NULL,
likelihood = NULL,
analysis_fn = NULL,
analysis_args = NULL,
model_fn = NULL,
par_fn = NULL,
Q = 50,
npreg_method = "gam",
nsim = NULL,
verbose = FALSE,
check = FALSE,
...
)Arguments
- outputs
This could take one of two forms
"net benefit" form: a matrix or data frame of samples from the uncertainty distribution of the expected net benefit. The number of rows should equal the number of samples, and the number of columns should equal the number of decision options.
"cost-effectiveness analysis" form: a list with the following named components:
"c": a matrix or data frame of samples from the distribution of costs. There should be one column for each decision option."e": a matrix or data frame of samples from the distribution of effects, likewise."k": a vector of willingness-to-pay values.Objects of class
"bcea", as created by the BCEA package, are in this "cost-effectiveness analysis" format, therefore they may be supplied as theoutputsargument.Users of heemod can create an object of this form, given an object produced by
run_psa(obj, say), withimport_heemod_outputs.If
outputsis a matrix or data frame, it is assumed to be of "net benefit" form. Otherwise if it is a list, it is assumed to be of "cost effectiveness analysis" form.- inputs
Matrix or data frame of samples from the uncertainty distribution of the input parameters of the decision model. The number of columns should equal the number of parameters, and the columns should be named. This should have the same number of rows as there are samples in
outputs, and each row of the samples inoutputsshould give the model output evaluated at the corresponding parameters.Users of heemod can create an object of this form, given an object produced by
run_psa(obj, say), withimport_heemod_inputs.- study
Name of one of the built-in study types supported by this package for EVSI calculation. If this is supplied, then the columns of
inputsthat correspond to the parameters governing the study data should be identified inpars.Current built-in studies are
"binary"A study with a binary outcome observed on one sample of individuals. Requires one parameter: the probability of the outcome. The sample size is specifed in thenargument toevsi(), and the binomially-distributed outcome is namedX1."trial_binary"Two-arm trial with a binary outcome. Requires two parameters: the probability of the outcome in arm 1 and 2 respectively. The sample size is the same in each arm, specifed in thenargument toevsi(), and the binomial outcomes are namedX1andX2respectively."normal_known"A study of a normally-distributed outcome, with a known standard deviation, on one sample of individuals. Likewise the sample size is specified in thenargument toevsi(). The standard deviation defaults to 1, and can be changed by specifyingsdas a component of theaux_parsargument, e.g.evsi(..., aux_pars=list(sd=2)).Either
studyordatagen_fnshould be supplied toevsi().For the EVSI calculation methods where explicit Bayesian analyses of the simulated data are performed, the prior parameters for these built-in studies are supplied in the
analysis_argsargument toevsi(). These assume Beta priors for probabilities, and Normal priors for the mean of a normal outcome.- datagen_fn
If the proposed study is not one of the built-in types supported, it can be specified in this argument as an R function to sample predicted data from the study. This function should have the following specification:
the function's first argument should be a data frame of parameter simulations, with one row per simulation and one column per parameter. The parameters in this data frame must all be found in
inputs, but need not necessarily be in the same order or include all of them.the function should return a data frame.
the returned data frame should have number of rows equal to the number of parameter simulations in
inputs.if
inputsis considered as a sample from the posterior, thendatagen_fn(inputs)returns a corresponding sample from the posterior predictive distribution, which includes two sources of uncertainty: (a) uncertainty about the parameters and (b) sampling variation in observed data given fixed parameter values.the function can optionally have more than one argument. If so, these additional arguments should be given default values in the definition of
datagen_fn. If there is an argument calledn, then it is interpreted as the sample size for the proposed study.
- pars
Character vector identifying which parameters are learned from the proposed study. This is required for the moment matching and importance sampling methods, and these should be columns of
inputs. This is not required for the nonparametric regression methods.- pars_datagen
Character vector identifying which columns of
inputsare the parameters required to generate data from the proposed study. These should be columns ofinputs.If
pars_datagenis not supplied, then it is assumed to be the same aspars. Note that these can be different. Even if the study data are generated by a particular parameter, when analysing the data we could choose to ignore the information that the data provides about that parameter.- n
Sample size of future study, or vector of alternative sample sizes. This is understood by the built-in study designs. For studies specified by the user with
datagen_fn, ifdatagen_fnhas an argumentn, then this is interpreted as the sample size. However if callingevsifor a user-specified design wheredatagen_fndoes not have annargument, then anynargument supplied toevsiwill be ignored.Currently this shortcut is not supported if more than one quantity is required to describe the sample size, for example, trials with unbalanced arms. In that case, you will have to hard-code the required sample sizes into
datagen_fn.For the nonparametric regression and importance sampling methods, the computation is simply repeated for each sample size supplied here.
The moment matching method uses a regression model to estimate the dependency of the EVSI on the sample size, hence to enable EVSI to be calculated efficiently for any number of sample sizes (Heath et al. 2019).
- aux_pars
A list of additional fixed arguments to supply to the function to generate the data, whether that is a built-in study design or user-defined function supplied in
datagen_fn. For example,evsi(..., aux_pars = list(sd=2))defines the fixed standard deviation in the"normal_known"model.- method
Character string indicating the calculation method. Defaults to
"gam".All the nonparametric regression methods supported for
evppi, that is"gam","gp","earth","inla", can also be used for EVSI calculation by regressing on a summary statistic of the predicted data (Strong et al 2015)."is"for importance sampling (Menzies 2016)"mm"for moment matching (Heath et al 2018)Note that the
"is"and"mm"methods are used in conjunction with nonparametric regression, and thegam_formulaargument can be supplied toevsito specify this regression - seeevppifor documentation of this argument.- likelihood
Likelihood function, required (and only required) for the importance sampling method when a study design other than one of the built-in ones is used. This should have two arguments, named as follows:
Y: a one-row data frame of predicted data. Columns are defined by different outcomes in the data, with names matching the names of the data frame returned bydatagen_fn.inputs. a data frame of simulated parameter values. Columns should correspond to different variables ininputs. The column names should all be found in the names ofinputs, though they do not have to be in the same order, or include everything ininputs. The number or rows should be the same as the number of rows ininputs.The function should return a vector whose length matches the number of rows of the parameters data frame given as the second argument. Each element of the vector gives the likelihood of the corresponding set of parameters, given the data in the first argument. An example is given in the vignette.
The likelihood can optionally have a
nargument, which is interpreted as the sample size of the study. If thenargument toevsiis used then this is passed to the likelihood function. Conversely anynargument toevsiwill be ignored by a likelihood function that does not have its ownnargument.Note the definition of the likelihood should agree with the definition of
datagen_fnto define a consistent sampling distribution for the data. No automatic check is performed for this.- analysis_fn
Function which fits a Bayesian model to the generated data. Required for
method="mm"if a study design other than one of the built-in ones is used. This should be a function that takes the following arguments:data: A data frame with names matching the output ofdatagen_fnargs: A list with constants required in the Bayesian analysis, e.g. prior parameters, or options for the analysis, e.g. number of MCMC simulations. The component of this list callednis assumed to contain the sample size of the study.parsNames of the parameters whose posterior is being sampled.The function should return a data frame with names matching
pars, containing a sample from the posterior distribution of the parameters given data supplied throughdata.analysis_fnis required to have all three of these arguments, but you do not need to use any elements ofargsorparsin the body ofanalysis_fn. Instead, sample sizes, prior parameters, MCMC options and parameter names can alternatively be hard-coded insideanalysis_fn. Passing these through the function arguments (via theanalysis_argsargument toevsi) is only necessary if we want to use the sameanalysis_fnto do EVSI calculations with different sample sizes or other settings.- analysis_args
List of arguments required for the Bayesian analysis of the predicted data, e.g. definitions of the prior and options to control sampling. Only used in
method="mm". This is required if the study design is one of the built-in ones specified instudy. If a custom design is specifed throughanalysis_fn, then any constants needed inanalysis_fncan either be supplied inanalysis_args, or hard-coded inanalysis_fnitself.For the built-in designs, the lists should have the following named components. An optional component
niterin each case defines the posterior sample size (default 1000).study="binary":aandb: Beta shape parametersstudy="trial_binary":a1andb1: Beta shape parameters for the prior for the first arm,a2andb2: Beta shape parameters for the prior for the second arm.study="normal_known":prior_mean,prior_sd(mean and standard deviation deviation of the Normal prior) andsampling_sd(SD of an individual-level normal observation, so that the sampling SD of the mean outcome over the study issampling_sd/sqrt(n).- model_fn
Function which evaluates the decision-analytic model, given parameter values. Required for
method="mm". Seeevppi_mcfor full documentation of the required specification of this function.- par_fn
Function to simulate values from the uncertainty distributions of parameters needed by the decision-analytic model. Should take one argument and return a data frame with one row for each simulated value, and one column for each parameter. See
evppi_mcfor full specification.- Q
Number of quantiles to use in
method="mm".- npreg_method
Method to use to calculate the EVPPI, for those methods that require it. This is passed to
evppias themethodargument.- nsim
Number of simulations from the model to use for calculating EVPPI. The first
nsimrows of the objects ininputsandoutputsare used.- verbose
If
TRUE, then messages are printed describing each step of the calculation, if the method supplies these. Can be useful to see the progress of slow calculations.- check
If
TRUE, then extra information about the estimation is saved inside the object that this function returns. This currently only applies to the regression-based methods"gam"and"earth"where the fitted regression model objects are saved. This allows use of thecheck_regressionfunction, which produces some diagnostic checks of the regression models.- ...
Other arguments understood by specific methods, e.g.
gam_formulaand other controlling options (seeevppi) can be passed to the nonparametric regression used inside the moment matching method.
Value
A data frame with a column pars, indicating the
parameter(s), and a column evsi, giving the corresponding
EVPPI. If the EVSI for multiple sample sizes was requested,
then the sample size is returned in the column n, and if
outputs is of "cost-effectiveness analysis" form, so that
there is one EVPPI per willingness-to-pay value, then a column
k identifies the willingness-to-pay.
Details
See the package overview / Get Started vignette for some examples of using this function.
References
Heath, A., Kunst, N., & Jackson, C. (eds.). (2024). Value of Information for Healthcare Decision-Making. CRC Press.
Strong, M., Oakley, J. E., Brennan, A., & Breeze, P. (2015). Estimating the expected value of sample information using the probabilistic sensitivity analysis sample: a fast, nonparametric regression-based method. Medical Decision Making, 35(5), 570-583.
Menzies, N. A. (2016). An efficient estimator for the expected value of sample information. Medical Decision Making, 36(3), 308-320.
Heath, A., Manolopoulou, I., & Baio, G. (2018). Efficient Monte Carlo estimation of the expected value of sample information using moment matching. Medical Decision Making, 38(2), 163-173.
Heath, A., Manolopoulou, I., & Baio, G. (2019). Estimating the expected value of sample information across different sample sizes using moment matching and nonlinear regression. Medical Decision Making, 39(4), 347-359.