diff --git a/R/implicit_integer_linter.R b/R/implicit_integer_linter.R
index 49e57c52e..90e2a3cf3 100644
--- a/R/implicit_integer_linter.R
+++ b/R/implicit_integer_linter.R
@@ -62,7 +62,7 @@ implicit_integer_linter <- function(allow_colon = FALSE) {
     is_negative <- !is.na(xml_find_first(number_expr, "parent::expr/preceding-sibling::OP-MINUS"))
 
     lint_message <-
-      sprintf("Use %1$dL or %1$d.0 to avoid implicit integers.", ((-1L) ^ is_negative) * as.integer(number))
+      sprintf("Use %1$dL or %1$d.0 to avoid implicit integers.", ((-1L)^is_negative) * as.integer(number))
 
     xml_nodes_to_lints(
       number_expr,
diff --git a/R/unnecessary_nesting_linter.R b/R/unnecessary_nesting_linter.R
index 0fdbe61fa..0a6ba5da3 100644
--- a/R/unnecessary_nesting_linter.R
+++ b/R/unnecessary_nesting_linter.R
@@ -197,7 +197,7 @@ unnecessary_nesting_linter <- function(
     collapse = " | "
   )
 
-  unnecessary_else_brace_xpath <-  "//IF/parent::expr[parent::expr[preceding-sibling::ELSE and count(expr) = 1]]"
+  unnecessary_else_brace_xpath <- "//IF/parent::expr[parent::expr[preceding-sibling::ELSE and count(expr) = 1]]"
 
   Linter(linter_level = "expression", function(source_expression) {
     xml <- source_expression$xml_parsed_content