From 93364178565a439d370b2eb55c60325cc5b254eb Mon Sep 17 00:00:00 2001 From: Marco Colombo Date: Mon, 16 Sep 2024 17:00:45 +0200 Subject: [PATCH] Silence notes raised by R CMD check. --- R/analyse_SAR.TL.R | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/R/analyse_SAR.TL.R b/R/analyse_SAR.TL.R index c7b6bad7e..bd05996ff 100644 --- a/R/analyse_SAR.TL.R +++ b/R/analyse_SAR.TL.R @@ -303,6 +303,10 @@ analyse_SAR.TL <- function( ## convert to data.table for more convenient column manipulation temp <- data.table(LnLxTnTx[, c("Name", "Dose", "Repeated", "LxTx")]) + ## silence notes raised by R CMD check + prev.idx <- criterion <- value <- threshold <- status <- NULL + Name <- Dose <- LxTx <- Repeated <- NULL + # Calculate Recycling Ratio ----------------------------------------------- ## we first create a dummy object to use in case there are no repeated doses, ## but replace it in the `if` block if there are any @@ -327,7 +331,7 @@ analyse_SAR.TL <- function( ## keep only the repeated doses RecyclingRatio <- temp[Repeated == TRUE, - .(criterion, value, threshold, status)] + list(criterion, value, threshold, status)] } # Calculate Recuperation Rate ---------------------------------------------