From a290a4e7a12c9d3cde0998b3b8112a77abb7590c Mon Sep 17 00:00:00 2001 From: Jamie Gilbert Date: Tue, 16 Jul 2024 09:13:24 -0700 Subject: [PATCH 1/2] Update RunAnalyses.R --- R/RunAnalyses.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/RunAnalyses.R b/R/RunAnalyses.R index 1899a3a8..d0a6dcee 100644 --- a/R/RunAnalyses.R +++ b/R/RunAnalyses.R @@ -762,7 +762,7 @@ getPs <- function(psFile) { } doCreateCmDataObject <- function(params) { - ParallelLogger::logDebug(sprintf("Calling getDbCohortMethodData() for targetId %d, comparatorId %d", + ParallelLogger::logDebug(sprintf("Calling getDbCohortMethodData() for targetId %s, comparatorId %s", params$args$targetId, params$args$comparatorId)) cohortMethodData <- do.call("getDbCohortMethodData", params$args) From 018f7010adc92e81f75c1987477a1abd13bc2f7e Mon Sep 17 00:00:00 2001 From: Jamie Gilbert Date: Tue, 16 Jul 2024 09:15:04 -0700 Subject: [PATCH 2/2] Update RunAnalyses.R --- R/RunAnalyses.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/RunAnalyses.R b/R/RunAnalyses.R index d0a6dcee..5f55f69c 100644 --- a/R/RunAnalyses.R +++ b/R/RunAnalyses.R @@ -774,7 +774,7 @@ doCreateStudyPopObject <- function(params) { cohortMethodData <- getCohortMethodData(params$cohortMethodDataFile) args <- params$args args$cohortMethodData <- cohortMethodData - ParallelLogger::logDebug(sprintf("Calling createStudyPopulation() using %s for outcomeId %d", + ParallelLogger::logDebug(sprintf("Calling createStudyPopulation() using %s for outcomeId ", params$cohortMethodDataFile, args$outcomeId)) studyPop <- do.call("createStudyPopulation", args) @@ -961,7 +961,7 @@ doFitOutcomeModelPlus <- function(params) { } cohortMethodData <- getCohortMethodData(cohortMethodDataFile) - ParallelLogger::logDebug(sprintf("Calling createStudyPopulation(), performing matching etc., and calling fitOutcomeModel() using %s for outcomeID %d", + ParallelLogger::logDebug(sprintf("Calling createStudyPopulation(), performing matching etc., and calling fitOutcomeModel() using %s for outcomeID ", cohortMethodDataFile, params$args$createStudyPopArgs$outcomeId))