added more lists

.Rbuildignore

@@ -1,2 +1,3 @@
 ^LICENSE\.md$
 ^\.github$
+^data-raw$

R/data.R

@@ -10,3 +10,18 @@
 #' @references
 #'  Stier, S., Mangold, F., Scharkow, M., & Breuer, J. (2022). Post Post-Broadcast Democracy? News Exposure in the Age of Online Intermediaries. American Political Science Review, 116(2), 768-774.
 "domain_list"
+
+
+#' Domain list of us news
+#' contains a list of and information on 5,397 US news domains. The domains overwhelmingly represent US-based organizations, but since the list was partly sourced from browsing data, it also includes some international domains visited by US study participants.
+#' @references
+#'  Clemm von Hohenberg, B., Menchen-Trevino, E., Casas, A., Wojcieszak, M. (2021). A list of over 5000 US news domains and their social media accounts. https://doi.org/10.5281/zenodo.7651047
+"us_news"
+
+
+#' Domain list of online news
+#'
+#' @references
+#'  Sebastian Stier, Nora Kirkizh, Caterina Froio, Ralph Schroeder. Populist
+#'  attitudes and selective exposure to online news <https://osf.io/5pe27>
+"us_news"

README.md

@@ -18,7 +18,9 @@ domainator wraps various APIs and provides lists to classify domains. This inclu
 - Stier, S., Mangold, F., Scharkow, M., & Breuer, J. (2022). Post Post-Broadcast
   Democracy? News Exposure in the Age of Online Intermediaries. American
   Political Science Review, 116(2), 768-774.
-
+- https://doi.org/10.5281/zenodo.7651047
+- https://osf.io/5pe27/
+- 
 
 
 `domainator` is part of a series of R packages to analyse webtracking data:

data-raw/lists.R

@@ -0,0 +1,12 @@
+us_news <- readr::read_csv("https://raw.githubusercontent.com/ercexpo/us-news-domains/main/us-news-domains-v2.0.0.csv")
+us_news$type[is.na(us_news$type)] <- "news"
+
+usethis::use_data(us_news, overwrite = TRUE)
+
+osfr::osf_retrieve_file("4zat2") |>
+    osfr::osf_download(path = "./data-raw")
+
+online_news <- readr::read_delim("./data-raw/Domain codes.csv", delim = ";")
+unlink("./data-raw/Domain codes.csv")
+
+usethis::use_data(online_news, overwrite = TRUE)