Refactor R_lib/kin_r_library.R to use setup$maxiter instead of iter for calculating max digits

This commit is contained in:
Max Lübke 2024-04-10 10:20:59 +00:00
parent 7ee438b667
commit 6d36dd7a2e

View File

@ -61,7 +61,7 @@ master_iteration_end <- function(setup, state_T, state_C) {
iter <- setup$iter
# print(iter)
## max digits for iterations
dgts <- as.integer(ceiling(log10(iter)))
dgts <- as.integer(ceiling(log10(setup$maxiter)))
## string format to use in sprintf
fmt <- paste0("%0", dgts, "d")