keep working on style
diff --git a/R/add_header_above.R b/R/add_header_above.R
index d3634fa..4c83a8e 100644
--- a/R/add_header_above.R
+++ b/R/add_header_above.R
@@ -94,7 +94,9 @@
cline_end <- cumsum(header_df$colspan)
cline_start <- c(0, cline_end) + 1
cline_start <- cline_start[-length(cline_start)]
- cline_type <- switch(booktabs + 1, "\\\\cline{", "\\\\cmidrule(l{2pt}r{2pt}){")
+ cline_type <- switch(booktabs + 1,
+ "\\\\cline{",
+ "\\\\cmidrule(l{2pt}r{2pt}){")
cline <- paste0(cline_type, cline_start, "-", cline_end, "}")
cline <- cline[trimws(header_df$header) != ""]
cline <- paste(cline, collapse = " ")