# will produce lints
lint(
  text = "x <- .1",
  linters = numeric_leading_zero_linter()
)
lint(
  text = "x <- -.1",
  linters = numeric_leading_zero_linter()
)
# okay
lint(
  text = "x <- 0.1",
  linters = numeric_leading_zero_linter()
)
lint(
  text = "x <- -0.1",
  linters = numeric_leading_zero_linter()
)
Run the code above in your browser using DataLab