Fix lints

.lintr

@@ -1,8 +1,9 @@
 linters: all_linters(
     packages = c("lintr", "etdev"),
-    pipe_consistency_linter(pipe = "%>%"),
+    line_length_linter(120),
     object_name_linter = NULL,
     implicit_integer_linter = NULL,
+    unnecessary_lambda_linter = NULL,
     extraction_operator_linter = NULL,
     todo_comment_linter = NULL,
     library_call_linter = NULL,

R/expand_names.R

@@ -22,14 +22,14 @@
 #' # Deduplicate names in list, as described in "details"
 #' epi_pkg_authors <- cran_epidemiology_packages |>
 #'   subset(!is.na(`Authors@R`), `Authors@R`, drop = TRUE) |>
-#'   parse_authors_r() |> 
+#'   parse_authors_r() |>
 #'   # Drop email, role, ORCID and format as string rather than person object
-#'   lapply(function(x) format(x, include = c("given", "family"))) |> 
+#'   lapply(function(x) format(x, include = c("given", "family"))) |>
 #'   unlist()
 #'
 #' # With all duplicates
 #' length(unique(epi_pkg_authors))
-#' 
+#'
 #' # Deduplicate
 #' epi_pkg_authors_normalized <- expand_names(epi_pkg_authors, epi_pkg_authors)
 #'

R/parse_authors.R

@@ -26,7 +26,7 @@
 #'
 #' @export
 parse_authors <- function(author_string) {
-  
+
   # Sanitize input from pkgsearch / crandb
   author_string <- author_string |>
     stringi::stri_replace_all_fixed(

R/parse_authors_r.R

@@ -35,6 +35,6 @@ parse_authors_r <- function(authors_r_string) {
   if (length(authors_persons) == 1) {
     authors_persons <- authors_persons[[1]]
   }
-  
+
   return(authors_persons)
 }