From 0d8ff791538628d3770a4f39304af5058c7757ab Mon Sep 17 00:00:00 2001 From: Nicholas Clark Date: Tue, 3 Dec 2024 10:51:50 +1000 Subject: [PATCH] small cmdcheck notes --- R/evaluate_mvgams.R | 2 +- R/globals.R | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/R/evaluate_mvgams.R b/R/evaluate_mvgams.R index 04ac1184..35164f6a 100644 --- a/R/evaluate_mvgams.R +++ b/R/evaluate_mvgams.R @@ -798,7 +798,7 @@ brier_mcmc_object <- function(truth, } else { scores <- matrix(NA, nrow = length(truth), ncol = 2) for(i in indices_keep){ - scores[i,] <- mvgam:::brier_score(truth = as.vector(truth)[i], + scores[i,] <- brier_score(truth = as.vector(truth)[i], fc = fc[,i]) } } diff --git a/R/globals.R b/R/globals.R index e2bcedd3..26aa793c 100644 --- a/R/globals.R +++ b/R/globals.R @@ -25,4 +25,5 @@ utils::globalVariables(c("y", "year", "smooth_vals", "smooth_num", "jags_path", "x", "elpds", "pareto_ks", "value", "threshold", "colour", "resids", "c_dark", "eval_timepoints", "yqlow", - "ymidlow", "ymidhigh", "yqhigh", "preds")) + "ymidlow", "ymidhigh", "yqhigh", "preds", + "yhigh", "ylow"))