updates -readr

AdrienLeGuillou · AdrienLeGuillou · commit 312de825d00b · 2025-04-26T08:47:23.000+02:00
diff --git a/R/ending.R b/R/ending.R
@@ -13,7 +13,7 @@ get_param_type <- function(x) {
 
 save_calibrated_csv <- function(calib_object) {
   long_calib <- get_long_calibrated_proposal(calib_object)
-  readr::write_csv(long_calib, get_calibrated_csv_path(calib_object))
+  write.csv(long_calib, get_calibrated_csv_path(calib_object), row.names = FALSE)
 }
 
 wrap_up_calibration <- function(calib_object) {
@@ -27,4 +27,3 @@ wrap_up_calibration <- function(calib_object) {
   message("Calibration complete")
   print_log(calib_object)
 }
-
diff --git a/R/proposal.R b/R/proposal.R
@@ -128,4 +128,3 @@ update_default_proposal <- function(calib_object, job_results) {
   }
   mutate_default_proposal(calib_object, default_proposal)
 }
-
diff --git a/R/wave.R b/R/wave.R
@@ -50,4 +50,3 @@ increment_wave <- function(calib_object) {
   make_directories(calib_object)
   calib_object
 }
-

Original file line number	Diff line number	Diff line change
`@@ -13,7 +13,7 @@ get_param_type <- function(x) {`
`13`	`13`
`14`	`14`	`save_calibrated_csv <- function(calib_object) {`
`15`	`15`	`long_calib <- get_long_calibrated_proposal(calib_object)`
`16`		`- readr::write_csv(long_calib, get_calibrated_csv_path(calib_object))`
	`16`	`+ write.csv(long_calib, get_calibrated_csv_path(calib_object), row.names = FALSE)`
`17`	`17`	`}`
`18`	`18`
`19`	`19`	`wrap_up_calibration <- function(calib_object) {`
`@@ -27,4 +27,3 @@ wrap_up_calibration <- function(calib_object) {`
`27`	`27`	`message("Calibration complete")`
`28`	`28`	`print_log(calib_object)`
`29`	`29`	`}`
`30`		`-`
Original file line number	Diff line number	Diff line change
`@@ -128,4 +128,3 @@ update_default_proposal <- function(calib_object, job_results) {`
`128`	`128`	`}`
`129`	`129`	`mutate_default_proposal(calib_object, default_proposal)`
`130`	`130`	`}`
`131`		`-`
Original file line number	Diff line number	Diff line change
`@@ -50,4 +50,3 @@ increment_wave <- function(calib_object) {`
`50`	`50`	`make_directories(calib_object)`
`51`	`51`	`calib_object`
`52`	`52`	`}`
`53`		`-`