fix the calib object not being saved at the end of calibration

AdrienLeGuillou · AdrienLeGuillou · commit f83c1294a325 · 2024-02-16T13:15:36.000+01:00
diff --git a/R/calibration_steps.R b/R/calibration_steps.R
@@ -24,8 +24,8 @@ calibration_step1 <- function(calib_object, n_cores) {
   } else {
     proposals <- make_proposals(calib_object, results)
     save_proposals(calib_object, proposals)
-    save_calib_object(calib_object)
   }
+  save_calib_object(calib_object)
 
   print_log(calib_object)
 }

Original file line number	Diff line number	Diff line change
`@@ -24,8 +24,8 @@ calibration_step1 <- function(calib_object, n_cores) {`
`24`	`24`	`} else {`
`25`	`25`	`proposals <- make_proposals(calib_object, results)`
`26`	`26`	`save_proposals(calib_object, proposals)`
`27`		`- save_calib_object(calib_object)`
`28`	`27`	`}`
	`28`	`+ save_calib_object(calib_object)`
`29`	`29`
`30`	`30`	`print_log(calib_object)`
`31`	`31`	`}`