From 42e2acbf8f7e0ad37af35632ccc806b9f1c37a1b Mon Sep 17 00:00:00 2001 From: miturbide Date: Fri, 23 Jun 2023 14:01:40 +0200 Subject: [PATCH] minor --- R/biasCorrection.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/biasCorrection.R b/R/biasCorrection.R index b1edb6d..650e5e5 100644 --- a/R/biasCorrection.R +++ b/R/biasCorrection.R @@ -167,7 +167,7 @@ #' #' The precipitation subroutines are switched-on when the variable name of the grid #' (i.e., the value returned by \code{gridData$Variable$varName}) is one of the following: -#' \code{"pr"}, \code{"tp"} (this is the standard name defined in the vocabulary (\code{\link[loadeR.UDG]{C4R.vocabulary}}), \code{"precipitation"} or \code{"precip"}. +#' \code{"pr"}, \code{"tp"} (this is the standard name defined in the vocabulary (\code{\link[cliamte4R.UDG]{C4R.vocabulary}}), \code{"precipitation"} or \code{"precip"}. #' Thus, caution must be taken to ensure that the correct bias correction is being undertaken when dealing with #' non-standard variables. #' @@ -542,7 +542,7 @@ biasCorrectionXD <- function(y, x, newdata, max.ncores = max.ncores, ncores = ncores) if (!station) { - if(class(mat) == "numeric") mat <- as.matrix(mat) + if(is.numeric(mat)) mat <- as.matrix(mat) mat <- mat2Dto3Darray(mat, xy$x, xy$y) } mat