We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent b124795 commit e1331cbCopy full SHA for e1331cb
R/format_formula.R
@@ -17,6 +17,6 @@
17
#' format_formula(model, "random")
18
#' @export
19
format_formula <- function(x, what = "conditional") {
20
- f <- insight::safe_deparse(insight::find_formula(x)[[what]])
+ f <- insight::safe_deparse(insight::find_formula(x, verbose = FALSE)[[what]])
21
paste0("formula: ", paste0(f, collapse = " + "))
22
}
0 commit comments