lintr (version 3.4.0)

assignment_linter: Assignment linter

Description

Check that the specified operator is used for assignment.

Usage

assignment_linter(operator = "<-", allow_trailing = TRUE)

Arguments

operator

Character vector of valid assignment operators. Defaults to allowing only <-; other valid options are =, <<-, ->, ->>, %<>%; use "any" to denote "allow all operators", in which case

allow_trailing

Logical, default TRUE. If FALSE then assignments aren't allowed at end of lines.

Tags

configurable, consistency, default, style

See Also

• linters for a complete list of linters available in lintr.

• https://style.tidyverse.org/syntax.html#assignment-1

• https://style.tidyverse.org/pipes.html#assignment-2

Examples

# will produce lints
lint(
  text = "x = mean(x)",
  linters = assignment_linter()
)

code_lines <- "1 -> x\n2 ->> y\nz <<- 3"
writeLines(code_lines)
lint(
  text = code_lines,
  linters = assignment_linter()
)

lint(
  text = "x %<>% as.character()",
  linters = assignment_linter()
)

lint(
  text = "x <- 1",
  linters = assignment_linter(operator = "=")
)

# okay
lint(
  text = "x <- mean(x)",
  linters = assignment_linter()
)

code_lines <- "x <- 1\ny <- 2\nz <- 3"
writeLines(code_lines)
lint(
  text = code_lines,
  linters = assignment_linter()
)

# customizing using arguments
code_lines <- "1 -> x\n2 ->> y"
writeLines(code_lines)
lint(
  text = code_lines,
  linters = assignment_linter(operator = "->")
)

lint(
  text = "x <<- 1",
  linters = assignment_linter(operator = "<-")
)

writeLines("foo(bar = \n 1)")
lint(
  text = "foo(bar = \n 1)",
  linters = assignment_linter(allow_trailing = FALSE)
)

lint(
  text = "x %<>% as.character()",
  linters = assignment_linter(operator = "%<>%")
)

lint(
  text = "x = 1",
  linters = assignment_linter(operator = "=")
)