Merge pull request #55 from ropensci-review-tools/total-reviews

Total reviews on history page

Author: mpadge

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: dashboard
 Title: What the Package Does (One Line, Title Case)
-Version: 0.2.2.106
+Version: 0.2.2.108
 Authors@R: 
   person(given = "First",
          family = "Last",

codemeta.json

@@ -6,7 +6,7 @@
   "name": "dashboard: What the Package Does (One Line, Title Case)",
   "codeRepository": "https://github.com/ropensci-review-tools/dashboard",
   "license": "https://spdx.org/licenses/MIT",
-  "version": "0.2.2.106",
+  "version": "0.2.2.108",
   "programmingLanguage": {
     "@type": "ComputerLanguage",
     "name": "R",

quarto/editors.qmd

@@ -10,12 +10,12 @@ format:
 ---
 
 ```{r load-pkg-ed, echo = FALSE, message = FALSE}
-library (dashboard)
-library (ggplot2)
-library (tidyr)
-library (dplyr)
-library (ggiraph)
-library (gfonts)
+library (dashboard, quietly = TRUE)
+library (ggplot2, quietly = TRUE)
+library (tidyr, quietly = TRUE)
+library (dplyr, quietly = TRUE)
+library (ggiraph, quietly = TRUE)
+library (gfonts, quietly = TRUE)
 ```
 
 This page includes:

quarto/history.qmd

@@ -10,8 +10,8 @@ format:
 ---
 
 ```{r load-pkg, echo = FALSE, message = FALSE}
-library (dashboard)
-library (lubridate)
+library (dashboard, quietly = TRUE)
+library (lubridate, quietly = TRUE)
 ```
 
 This page includes several graphs providing insight into the historical
@@ -23,8 +23,17 @@ starting from September 2021. Prior to this time, all reviews were "general".
 ```{r get-rev-history, echo = FALSE}
 #| cache: true
 dat <- review_history (quiet = TRUE)
+index <- which (!is.na (dat$duration_days))
+num_reviewed <- length (index)
+num_reviewed_stats <- length (which (dat$stats [index]))
+index <- which (dat$state == "OPEN" & !is.na (dat$editor))
+num_current <- length (index)
+num_current_stats <- length (which (dat$stats [index]))
 ```
 
+We have to date reviewed `r num_reviewed` packages, including
+`r num_reviewed_stats` statistical packages. We currently have `r num_current`
+packages under review, including `r num_current_stats` statistical packages.
 
 ## Package submissions {#package-submissions}
 

quarto/index.qmd

@@ -29,7 +29,7 @@ repository](https://github.com/ropensci-review-tools/dashboard/issues).
 ---
 
 ```{r last-update, eval = TRUE, echo = FALSE, results = "asis"}
-library (httr2)
+library (httr2, quietly = TRUE)
 u_base <- "https://api.github.com/repos/"
 u_repo <- paste0 (u_base, "ropensci-review-tools/dashboard/")