add URLs for checks

git-svn-id: https://svn.r-project.org/R/trunk@88999 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: ligges

src/library/tools/R/QC.R

@@ -8991,6 +8991,7 @@ function(x, ...)
                        (grepl(re_or(c("^https://pubmed.ncbi.nlm.nih.gov/[0-9]+",
                                       "^https://www.ncbi.nlm.nih.gov/pmc/articles/PMC[0-9]+/$",
                                       "^https://academic.oup.com/.*(/[0-9]*){4}$",
+                                      "^https://journals.plos.org/.*/article",
                                       "^https://www.sciencedirect.com/science/article")),
                               y$URL)))) {
                 ## <FIXME>

src/library/tools/R/urltools.R

@@ -738,6 +738,7 @@ function(db, remote = TRUE, verbose = FALSE, parallel = FALSE, pool = NULL)
                 "^https?://pubs.acs.org/",
                 "^https?://journals.aom.org/",
                 "^https?://journals.sagepub.com/",
+                "^https?://epubs.siam.org/",
                 "^https?://www.pnas.org/")
             false_pos_db_404 <- c(                
                 "^https?://finance.yahoo.com/")