param_list <- define_parameters(
cost_direct_med_A = 1701, cost_comm_care_A = 1055,
cost_direct_med_B = 1774, cost_comm_care_B = 1278,
cost_direct_med_C = 6948,
cost_comm_care_C = 2059, cost_zido = 2456, cost_health_A =
"cost_direct_med_A + cost_comm_care_A",
cost_health_B = "cost_direct_med_B + cost_comm_care_B",
cost_health_C = "cost_direct_med_C + cost_comm_care_C",
cost_drug = "cost_zido"
)
assign_parameters(param_list)
Run the code above in your browser using DataLab