View source: R/3c_costing_resource_use_functions.R
| costing_AandE_admission | R Documentation | 
Function to estimate the cost of inpatient admission but taken from GP records where code or description known
costing_AandE_admission(
  ind_part_data,
  code_ae,
  descrip_ae,
  number_use_ae,
  type_admit_ae,
  unit_cost_data,
  code_col,
  type_admit_col,
  description_col,
  unit_cost_col,
  cost_calculated_in = "attendance",
  sheet = NULL
)
ind_part_data | 
 IPD  | 
code_ae | 
 column name of code (for inpatient admission)  | 
descrip_ae | 
 column name of description for inpatient admission  | 
number_use_ae | 
 the number of days spent in each admission if that is a criteria to be included. Otherwise each admission will be costed  | 
type_admit_ae | 
 term indicating admission and type of attendance  | 
unit_cost_data | 
 unit cost data file with code/descriptions and unit costs are listed for inpatient admission  | 
code_col | 
 code column name in unit cost data  | 
type_admit_col | 
 colname that describes type of the attendance and  | 
description_col | 
 column name of description of inpatient admission in the unit cost data  | 
unit_cost_col | 
 column name of unit cost in unit_cost_data  | 
cost_calculated_in | 
 name of unit where the cost is calculated assumed to be per admission  | 
sheet | 
 sheet where the unit costs are listed in the unit costs data file  | 
the calculated cost of inpatient admission long with original data
costs_file <- system.file("extdata",
"National_schedule_of_NHS_costs_2019_AandE.csv", package = "packDAMipd")
datafile <- system.file("extdata", "resource_use_ae_ip.csv",
package = "packDAMipd")
ind_part_data <- packDAMipd::load_trial_data(datafile)
unit_cost_data <- packDAMipd::load_trial_data(costs_file)
result <- costing_AandE_admission(ind_part_data = ind_part_data,
code_ae = "code", descrip_ae = NULL, number_use_ae = "number_use",
type_admit_ae = "type_admit", unit_cost_data = unit_cost_data,
code_col = "Currency_Code", type_admit_col = "Service_Code",
description_col = NULL, unit_cost_col ="National_Average_Unit_Cost",
cost_calculated_in = "attendance")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.