diff --git a/processing/wikiproc/R/get_birthdate.R b/processing/wikiproc/R/get_birthdate.R
index 09f243e43ac8b035282127d22b130adc66b4c988..a316ca2e2c40317d361184d837c1d732d36a602c 100644
--- a/processing/wikiproc/R/get_birthdate.R
+++ b/processing/wikiproc/R/get_birthdate.R
@@ -63,7 +63,7 @@ getIntroduction <- function(article) {
     xml2::xml_add_sibling("p", "\n")
 
   xml2::xml_find_all(page, ".//br") %>%
-    xml2::xml_remove
+    xml2::xml_remove(.)
 
   # Get all paragraphs
   paragraphs <- page %>%
@@ -73,7 +73,7 @@ getIntroduction <- function(article) {
   # There will be some leading paragraphs containing only "\n"
   # Remove those leading paragraphs
   remove <- c("\n")
-  cleaned <- data.table::setdiff(paragraphs, remove)
+  cleaned <- setdiff(paragraphs, remove)
   introduction <- cleaned[1]
 
   # Return first paragraph
diff --git a/processing/wikiproc/R/utils.R b/processing/wikiproc/R/utils.R
index 6a3bc32063ab1f2e2d40bb2b9bcb89fa0bd8ce0e..baffaa9e2da4f03d74159e10cbffb294be4451db 100644
--- a/processing/wikiproc/R/utils.R
+++ b/processing/wikiproc/R/utils.R
@@ -27,7 +27,7 @@ get_infobox <- function(article) {
     xml2::xml_add_sibling("p", "\n")
   
   xml2::xml_find_all(page, ".//br") %>%
-    xml2::xml_remove()
+    xml2::xml_remove(.)
   
   # Get the info box
   # Will throw an error if there isnt any, so that should be checked beforehand