From 24068787786a90b7b639bea688518fa2c896128e Mon Sep 17 00:00:00 2001 From: Jong-3 Date: Wed, 15 Jan 2025 20:24:39 +0100 Subject: [PATCH] Due to naming conflict changed from within.sample to within_sample --- R/metapred_utils.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/metapred_utils.R b/R/metapred_utils.R index e6119b0..bad8f2e 100644 --- a/R/metapred_utils.R +++ b/R/metapred_utils.R @@ -128,7 +128,7 @@ fixed <- function(st.u, k = NULL, ...) { list(dev = list(st.u[-k]), dev.i = list(indexes[-k]), val = list(st.u[k]), val.i = list(indexes[k])) } -ws <- within.sample <- function(st.u, ...) { # Necessary for testing recalibration functions. +ws <- within_sample <- function(st.u, ...) { # Necessary for testing recalibration functions. st.u <- sort(st.u) if (length(st.u) < 2) stop("Selecting a validation set is impossible for < 2 data sets.")