From 38b88905df82aa099cd42ecdf3b6aa85353507ce Mon Sep 17 00:00:00 2001 From: Istem Fer Date: Mon, 26 Feb 2024 20:21:13 +0200 Subject: [PATCH] more namespace calls --- models/basgra/R/write.config.BASGRA.R | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/models/basgra/R/write.config.BASGRA.R b/models/basgra/R/write.config.BASGRA.R index 523ea424f11..182d71d06e5 100644 --- a/models/basgra/R/write.config.BASGRA.R +++ b/models/basgra/R/write.config.BASGRA.R @@ -32,11 +32,11 @@ write.config.BASGRA <- function(defaults, trait.values, settings, run.id, IC = N # load default(!) BASGRA params if (!is.null(settings$run$inputs$defaults$path)) { - df_run_params <- read.csv(settings$run$inputs$defaults$path) + df_run_params <- utils::read.csv(settings$run$inputs$defaults$path) } else { - df_run_params <- read.csv(system.file("BASGRA_params.csv", package = "PEcAn.BASGRA")) + df_run_params <- utils::read.csv(system.file("BASGRA_params.csv", package = "PEcAn.BASGRA")) } - run_params <- setNames(df_run_params[,2], df_run_params[,1]) + run_params <- stats::setNames(df_run_params[,2], df_run_params[,1]) run_params[which(names(run_params) == "LAT")] <- as.numeric(settings$run$site$lat) #### write run-specific PFT parameters here #### Get parameters being handled by PEcAn for (pft in seq_along(trait.values)) {