ref_cost_data_file <- system.file("extdata",
"National_schedule_of_NHS_costs_2019.csv", package = "packDAMipd")
result <- get_cost_ip_dc_description("Cerebrovascular Accident",
ref_cost_data_file, "Currency_Description",
"National_Average_Unit_Cost")
Run the code above in your browser using DataLab