Function to extract the unit cost by descirption of AandE att matching description
get_cost_AandE_description(
description,
type_admit,
ref_cost_data_file,
col_name_description,
unit_cost_col,
type_admit_col,
sheet = NULL
)
unit cost the unit cost matching the hrg code
description of the AE attendance
term indicating admission and type of attendance
file that has unit cost
name of the column that has the description
name of the column with the unit cost
colname that descirbes type of the attendance and
sheet if excel file is given
ref_cost_data_file <- system.file("extdata",
"National_schedule_of_NHS_costs_2019_AandE.csv", package = "packDAMipd")
re = get_cost_AandE_description("Emergency Medicine", "T01A",
ref_cost_data_file, "Currency_Description", "National_Average_Unit_Cost",
"Service_Code")
Run the code above in your browser using DataLab