Add tryCatch fallback for Bioc download stats (fixes #3)

dlstats::bioc_stats() can error when the Bioconductor stats endpoint
is unavailable. Now catches the error gracefully, warns the user,
and returns empty results instead of crashing. [skip ci]

Co-Authored-By: Claude Opus 4.6 (1M context) <noreply@anthropic.com>

Author: bschilder

R/r_repos_downloads_bioc_dlstats.R

@@ -15,9 +15,17 @@ r_repos_downloads_bioc_dlstats <- function(pkgs,
                        messager(paste("Batch:",i,"/",length(batches)),
                                 parallel = TRUE,
                                 v=verbose)
-                       dt <- dlstats::bioc_stats(packages = b,
-                                                 use_cache = use_cache) |>
+                       dt <- tryCatch({
+                           dlstats::bioc_stats(packages = b,
+                                               use_cache = use_cache) |>
+                               data.table::data.table()
+                       }, error = function(e){
+                           messager("WARNING: Bioc download stats ",
+                                    "unavailable for this batch: ",
+                                    conditionMessage(e),
+                                    parallel = TRUE, v=verbose)
                            data.table::data.table()
+                       })
                        messager(paste(
                            "Data for",formatC(nrow(dt),big.mark = ","),
                            "packages retrieved."