for real, feed correct slice of pop_dt

cmmid · Nov 3, 2024 · 190ae37 · 190ae37
1 parent 4a1ad14
commit 190ae37
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/inst/analysis/scripts/param.R b/inst/analysis/scripts/param.R
@@ -46,15 +46,15 @@ for (i in seq_along(widths)) {
 }
 
 mapping_dt <- alembic(
-  f_param = f_ifr, f_dense = pop_dt,
+  f_param = f_ifr, f_dense = pop_dt[, .(from, weight)],
   model_partition = model_agelimits,
   output_partition = pop_dt[, seq(min(from), max(from) + 1L)]
 )
 
 # using `parameter_summary` instead of `blend`, because we want to compare to
 # the naive alternatives
 ifr_params <- parameter_summary(
-  f_param = f_ifr, f_dense = pop_dt,
+  f_param = f_ifr, f_dense = pop_dt[, .(from, weight)],
   model_partition = model_agelimits
 )