From 6b3dddec56c1ee6339bc63ccc3dc8f4657cf7b8f Mon Sep 17 00:00:00 2001
From: egillax <egillax@gmail.com>
Date: Tue, 6 Aug 2024 16:46:53 +0200
Subject: [PATCH] update plp and combine designs with c()

---
 Main.R    | 2 +-
 renv.lock | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/Main.R b/Main.R
index bbacfda..4d666c1 100644
--- a/Main.R
+++ b/Main.R
@@ -155,7 +155,7 @@ execute <- function(jobContext) {
       restrictPlpDataSettings = jobContext$settings[[1]]$restrictPlpDataSettings,
       populationSettings = jobContext$settings[[1]]$populationSettings
     )
-    designs[[i]] <- design 
+    designs <- c(designs, design)
   }
   databaseNames <- c()
   databaseNames <- c(databaseNames, paste0(jobContext$moduleExecutionSettings$connectionDetailsReference))
diff --git a/renv.lock b/renv.lock
index b24eb0e..66d86e2 100644
--- a/renv.lock
+++ b/renv.lock
@@ -313,8 +313,8 @@
       "RemoteHost": "api.github.com",
       "RemoteUsername": "ohdsi",
       "RemoteRepo": "PatientLevelPrediction",
-      "RemoteRef": "develop",
-      "RemoteSha": "c48f42c5c1ba78388a1639d4784db2e3e040342a"
+      "RemoteRef": "validate_external_improvements",
+      "RemoteSha": "398ebb272a2b8a06be4786dbfc65519c67d8d255"
     },
     "PheValuator": {
       "Package": "PheValuator",