pass (local) cran check

R/builder.notR

@@ -2,7 +2,7 @@
 commandArgs(trailingOnly = TRUE) |>
   readLines() |> (\(x) {
     cat(
-      sprintf("\n#' @export\n%s <- rrejig(stats::%s)\n", x, x),
+      sprintf("\n#' @title Hash-Matched %s\n#' @param hash an object identifying the event related to the draw\n#' @inheritParams stats::%s\n#' @export\n%s <- rrejig(stats::%s)\n", x, x, x, x),
       sep = ""
     )
   })()

R/rrejig.R

@@ -27,8 +27,14 @@ rrejig <- function(rFUN) {
   return(.FUN)
 }
 
+#' @title Hash-Matched sample
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams base::sample
 #' @export
 sample <- rrejig(base::sample)
 
+#' @title Hash-Matched sample.int
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams base::sample.int
 #' @export
 sample.int <- rrejig(base::sample.int)

R/set_salt.R

@@ -19,6 +19,9 @@ set.salt <- function(salt) {
 
 #' @title Manage RNG state
 #'
+#' @param hash an object which identifies the event
+#' @param .hash.salt an object which identifies the universe
+#'
 #' @importFrom digest digest
 #' @export
 set.hash <- function(hash, .hash.salt) {

R/zzz_distros.R

@@ -1,75 +1,150 @@
 
+#' @title Hash-Matched r2dtable
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::r2dtable
 #' @export
 r2dtable <- rrejig(stats::r2dtable)
 
+#' @title Hash-Matched rbeta
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rbeta
 #' @export
 rbeta <- rrejig(stats::rbeta)
 
+#' @title Hash-Matched rbinom
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rbinom
 #' @export
 rbinom <- rrejig(stats::rbinom)
 
+#' @title Hash-Matched rcauchy
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rcauchy
 #' @export
 rcauchy <- rrejig(stats::rcauchy)
 
+#' @title Hash-Matched rchisq
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rchisq
 #' @export
 rchisq <- rrejig(stats::rchisq)
 
+#' @title Hash-Matched rexp
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rexp
 #' @export
 rexp <- rrejig(stats::rexp)
 
+#' @title Hash-Matched rf
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rf
 #' @export
 rf <- rrejig(stats::rf)
 
+#' @title Hash-Matched rgamma
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rgamma
 #' @export
 rgamma <- rrejig(stats::rgamma)
 
+#' @title Hash-Matched rgeom
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rgeom
 #' @export
 rgeom <- rrejig(stats::rgeom)
 
+#' @title Hash-Matched rhyper
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rhyper
 #' @export
 rhyper <- rrejig(stats::rhyper)
 
+#' @title Hash-Matched rlnorm
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rlnorm
 #' @export
 rlnorm <- rrejig(stats::rlnorm)
 
+#' @title Hash-Matched rlogis
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rlogis
 #' @export
 rlogis <- rrejig(stats::rlogis)
 
+#' @title Hash-Matched rmultinom
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rmultinom
 #' @export
 rmultinom <- rrejig(stats::rmultinom)
 
+#' @title Hash-Matched rnbinom
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rnbinom
 #' @export
 rnbinom <- rrejig(stats::rnbinom)
 
+#' @title Hash-Matched rnorm
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rnorm
 #' @export
 rnorm <- rrejig(stats::rnorm)
 
+#' @title Hash-Matched rpois
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rpois
 #' @export
 rpois <- rrejig(stats::rpois)
 
+#' @title Hash-Matched rsignrank
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rsignrank
 #' @export
 rsignrank <- rrejig(stats::rsignrank)
 
+#' @title Hash-Matched rsmirnov
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rsmirnov
 #' @export
 rsmirnov <- rrejig(stats::rsmirnov)
 
+#' @title Hash-Matched rstandard
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rstandard
 #' @export
 rstandard <- rrejig(stats::rstandard)
 
+#' @title Hash-Matched rstudent
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rstudent
 #' @export
 rstudent <- rrejig(stats::rstudent)
 
+#' @title Hash-Matched rt
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rt
 #' @export
 rt <- rrejig(stats::rt)
 
+#' @title Hash-Matched runif
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::runif
 #' @export
 runif <- rrejig(stats::runif)
 
+#' @title Hash-Matched rweibull
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rweibull
 #' @export
 rweibull <- rrejig(stats::rweibull)
 
+#' @title Hash-Matched rwilcox
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rwilcox
 #' @export
 rwilcox <- rrejig(stats::rwilcox)
 
+#' @title Hash-Matched rWishart
+#' @param hash an object identifying the event related to the draw
+#' @inheritParams stats::rWishart
 #' @export
 rWishart <- rrejig(stats::rWishart)