From 04cbe43eb687711e9a14498cd5251c7ef9ed39bb Mon Sep 17 00:00:00 2001
From: Maxime Wack <maximewack@free.Fr>
Date: Sat, 25 Jun 2022 17:44:59 +0200
Subject: [PATCH] Add cdw map variables

---
 .Rprofile | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/.Rprofile b/.Rprofile
index 72fb058..660fae6 100644
--- a/.Rprofile
+++ b/.Rprofile
@@ -11,7 +11,9 @@ if(interactive())
           tibble.print_min = 20,
           tibble.print_max = 100,
           i2b2_user = "4117773",
-          i2b2_pass = system("pass i2b2_oracle", intern = T))
+          i2b2_pass = system("pass i2b2_oracle", intern = T),
+          i2b2_map_user = "dih",
+          i2b2_map_pass = system("pass cdw.egp.aphp.fr/wiki", intern = T))
 
   .View <- function(x)
   {