powered by
Function to add EQ5D3L scores to IPD data
value_eq5d3L_IPD(ind_part_data, eq5d_nrcode)
a dataframe
non response code for EQ5D3L, default is NA
qaly included modified data, if success -1, if failure
# NOT RUN { 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