styler

easystats · Sep 1, 2024 · 032d193 · 032d193
1 parent a57a780
commit 032d193
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 4 deletions.
diff --git a/R/link_function.R b/R/link_function.R
@@ -61,8 +61,7 @@ link_function.default <- function(x, ...) {
   }
   # if all fails, force default link
   if (is.null(out) && !is.null(default_link)) {
-    out <- switch(
-      default_link,
+    out <- switch(default_link,
       identity = .safe(stats::gaussian(link = "identity")$linkfun),
       .safe(stats::make.link(link = default_link)$linkfun)
     )

diff --git a/R/link_inverse.R b/R/link_inverse.R
@@ -68,8 +68,7 @@ link_inverse.default <- function(x, ...) {
   }
   # if all fails, force default link
   if (is.null(out) && !is.null(default_link)) {
-    out <- switch(
-      default_link,
+    out <- switch(default_link,
       identity = .safe(stats::gaussian(link = "identity")$linkinv),
       .safe(stats::make.link(link = default_link)$linkinv)
     )