lintr

easystats · Sep 23, 2023 · b08d338 · b08d338
1 parent a61c2ec
commit b08d338
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/format_table.R b/R/format_table.R
@@ -290,10 +290,10 @@ format_table <- function(x,
   # df for errors
   if ("df_error" %in% names(x)) {
     x$df_error <- format_value(x$df_error, protect_integers = TRUE)
-    if (!("df" %in% names(x))) {
-      names(x)[names(x) == "df_error"] <- "df"
-    } else {
+    if ("df" %in% names(x)) {
       names(x)[names(x) == "df_error"] <- "df (error)"
+    } else {
+      names(x)[names(x) == "df_error"] <- "df"
     }
   }
   # denominator and numerator df