Remove dependency on stringr (closes #9)

EllaKaye · Jan 2, 2024 · 64c5517 · 64c5517
1 parent 8a7b27c
commit 64c5517
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -20,8 +20,7 @@ Imports:
     httr,
     lubridate,
     readr,
-    rlang,
-    stringr
+    rlang
 Suggests: 
     testthat (>= 3.0.0)
 Config/testthat/edition: 3
diff --git a/R/string-helpers.R b/R/string-helpers.R
@@ -13,7 +13,9 @@
 #' @examples extract_numbers("1, -3, 16, -136")
 #'
 extract_numbers <- function(x) {
-	stringr::str_extract_all(x, "-?\\d+") |>
+
+	matches <- gregexpr(pattern = "-?\\d+", text = x)
+	regmatches(x, matches) |>
 		unlist() |>
 		as.numeric()
 }