powered by
Function to add EQ5D5L scores to IPD data
value_eq5d5L_IPD(ind_part_data, eq5d_nrcode)
qaly included modified data, if success -1, if failure
a dataframe
non response code for EQ5D5L, default is NA
datafile <- system.file("extdata", "trial_data.csv", package = "packDAMipd") trial_data <- load_trial_data(datafile) value_eq5d5L_IPD(trial_data, NA)
Run the code above in your browser using DataLab