Update print_prior function

giabaio · giabaio · commit da1bc59a3de8 · 2025-07-11T15:11:36.000+01:00
diff --git a/R/utils_print_survHE.R b/R/utils_print_survHE.R
@@ -797,7 +797,7 @@ extract_model_block <- function(x, mod = 1) {
           }
         })
         prefix <- if (!is.null(beta_names) && length(beta_names) >= i) {
-          paste0(beta_names[i], "_")
+          paste0(beta_names[i], ": ")
         } else {
           ""
         }

Original file line number	Diff line number	Diff line change
`@@ -797,7 +797,7 @@ extract_model_block <- function(x, mod = 1) {`
`797`	`797`	`}`
`798`	`798`	`})`
`799`	`799`	`prefix <- if (!is.null(beta_names) && length(beta_names) >= i) {`
`800`		`- paste0(beta_names[i], "_")`
	`800`	`+ paste0(beta_names[i], ": ")`
`801`	`801`	`} else {`
`802`	`802`	`""`
`803`	`803`	`}`