diff --git a/R/add_totals.R b/R/add_totals.R
index 5efca1d9..624a56b4 100644
--- a/R/add_totals.R
+++ b/R/add_totals.R
@@ -35,8 +35,8 @@ adorn_totals <- function(dat, which = c("row", "col"), fill = "-", na.rm = TRUE)
     
     col_totals[nrow(col_totals), 1] <- "Total" # replace final row, first column with "Total"
     dat <- dplyr::bind_rows(dat %>%
-                              stats::setNames(names(dat)) %>%
-                              dplyr::mutate_at(1, as.character), col_totals)
+                              stats::setNames(names(dat)),
+                            col_totals)
   }
   
   if("col" %in% which){