From 4c72dc6e1270cf2f1fb8659c390bc20f67385d8e Mon Sep 17 00:00:00 2001
From: Lucky <66523959+l-ucky@users.noreply.github.com>
Date: Wed, 30 Aug 2023 22:05:52 -0300
Subject: [PATCH] html_text -> html_text2

---
 scripts/4chan pol ngram Scraper v2.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scripts/4chan pol ngram Scraper v2.R b/scripts/4chan pol ngram Scraper v2.R
index 55ef879..1f375ff 100644
--- a/scripts/4chan pol ngram Scraper v2.R	
+++ b/scripts/4chan pol ngram Scraper v2.R	
@@ -102,7 +102,7 @@ df_links$txt <- paste("https://boards.4chan.org/pol/", df_links$txt, sep = "")
 # to each row in the data frame
 threads <- lapply(df_links$txt, function(x) {
   read_html(x) %>%
-    html_text()})
+    html_text2()})
 
 # Turn "threads" into a tibble so tidytex can manipulate it
 threads_tibble <- tibble(txt = threads)