Fix missing epiprocess::: in internal examples; addr line length lint

Author: brookslogan

R/utils.R

@@ -109,11 +109,11 @@ format_chr_deparse <- function(x) {
 #' @return chr; same `length` as `x` if `x` had nonzero length; value of `empty` otherwise
 #'
 #' @examples
-#' cli::cli_inform('{format_chr_with_quotes("x")}')
-#' cli::cli_inform('{format_chr_with_quotes(c("x","y"))}')
+#' cli::cli_inform('{epiprocess:::format_chr_with_quotes("x")}')
+#' cli::cli_inform('{epiprocess:::format_chr_with_quotes(c("x","y"))}')
 #' nms <- c("x", "\"Total Cases\"")
-#' cli::cli_inform("{format_chr_with_quotes(nms)}")
-#' cli::cli_inform("{format_chr_with_quotes(character())}")
+#' cli::cli_inform("{epiprocess:::format_chr_with_quotes(nms)}")
+#' cli::cli_inform("{epiprocess:::format_chr_with_quotes(character())}")
 #'
 #' @keywords internal
 format_chr_with_quotes <- function(x, empty = "*none*") {

man/format_chr_with_quotes.Rd

@@ -134,7 +134,7 @@ test_that("compactify works on distributions", {
     .pred_distn = c(
       quantile_pred_once(c(1, 5, 9), c(0.1, 0.5, 0.9)),
       quantile_pred_once(c(1, NA, 9), c(0.1, 0.5, 0.9)), # single NA in quantiles
-      quantile_pred_once(c(NA, NA, NA), c(0.1, 0.5, 0.9)), # all NAs in quantiles (hardhat+vctrs+epipredict treats as missing)
+      quantile_pred_once(c(NA, NA, NA), c(0.1, 0.5, 0.9)), # all NAs in quantiles
       quantile_pred_once(c(1, 5, 9), c(0.1, 0.5, 0.9)), # and back
       quantile_pred_once(c(3, 5, 9), c(0.1, 0.5, 0.9)), # change quantile
       quantile_pred_once(c(3, 5, 9), c(0.1, 0.5, 0.9)) # LOCF