Parameters used to estimate productivity costs including costs from temporary disability, permanent disability, and premature mortality.
params_costs_prod
A list with the following elements:
A data.table with columns:
Male or female gender.
Employed full-time, employed part-time, or unemployed.
Proportion of population.
Weekly wage.
Source for prop.
Source for wage.
Mean wages are computed as a weighted average of wages for full-time, part-time, and unemployed workers.
A vector with three elements:
Estimate for number of days worked following diagnosis due to sick leave and leave of absence.
Lower bound for missed_days_est.
Upper bound for missed_days_upper.
A vector with three elements:
Estimate of reduced working hours following initial abscence.
Lower bound for hours_reduction_est.
Upper bound for hours_reduction_est.
print(params_costs_prod)#> $wages #> gender employment_status prop weekly_wage #> 1: female full 0.72360125 796 #> 2: female part 0.23331205 326 #> 3: female unemployed 0.04308671 0 #> 4: male full 0.84057784 973 #> 5: male part 0.11546186 321 #> 6: male unemployed 0.04396030 0 #> source_prop #> 1: https://www.bls.gov/cps/cpsaat08.htm #> 2: https://www.bls.gov/cps/cpsaat08.htm #> 3: https://www.bls.gov/cps/cpsaat08.htm #> 4: https://www.bls.gov/cps/cpsaat08.htm #> 5: https://www.bls.gov/cps/cpsaat08.htm #> 6: https://www.bls.gov/cps/cpsaat08.htm #> source_wage #> 1: https://www.bls.gov/news.release/pdf/wkyeng.pdf #> 2: https://www.bls.gov/news.release/pdf/wkyeng.pdf #> 3: <NA> #> 4: https://www.bls.gov/news.release/pdf/wkyeng.pdf #> 5: https://www.bls.gov/news.release/pdf/wkyeng.pdf #> 6: <NA> #> #> $temporary_disability #> missed_days_est missed_days_lower missed_days_upper #> 151.0 120.8 181.2 #> #> $permanent_disability #> hours_reduction_est hours_reduction_lower hours_reduction_upper #> 4 3 5 #>