hospital_names <- c(    #Añadir Los de Baskent y sacrocuore
  "Princesa DEPRECATED",
  "CIPH DEPRECATED",
  "UMF_Iasis",
  "SMUC",
  "HM",
  "Porto DEPRECATED",
  "FJD",
  "Coimbra",
  "UNAV",
  "TU",
  "Ankara Adults",
  "Konya Adults",
  "Istambul",
  "Izmir",
  "Alanya Adults",
  "Adana Adults",
  "Ankara Minors",
  "Adana Minors",
  "Istambul DEPRECATED",
  "Izmir DEPRECATED",
  "Alanya DEPRECATED",
  "Sacrocuore Emergency",
  "Sacrocuore Employees DEPRECATED",
  "Sacrocuore Verona",
  "Sacrocuore Isaric",
  "TUDublin",
  "UMF_Cluj",
  "UdeA",
  "Inantro",
  "UNSA",
  "UZA",
  "ULSS6",
  "ASPEUR"
)

project_names <- c(
  "FIBHULP",
  "CIPH_unCoVer",
  "umfiasi",
  "SMUC",
  "FiHM",
  "uncover-up",
  "IISFJD",
  "IPC",
  "unCOVer-UNAV",
  "TU_Uncover",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "BU",
  "S_uncover",
  "S_uncover",
  "S_uncover",
  "S_uncover",
  "TUDublin",
  "UMF_Cluj",
  "INS_Data",
  "INANTRO",
  "UnCoVer-BiH-Final",
  "UZA",
  "ULSS6",
  "ASPEUR"
)

resource_names <- c(
  "Harmonized_variables_2",
  "CIPH_numeric_derivated",
  "20220919_UMFIasi",
  "20220919_SMUC",
  "20220919_FiHM",
  "Resource_derived",
  "20220919_IISFJD",
  "20220919_IPC",
  "20230311_UNAV_DB_2_3",
  "20220919_TU",
  "20220919_AnkaraAdults",
  "20220919_Konya",
  "20220919_Istanbul",
  "20220919_Izmir",
  "20220919_AlanyaAdults",
  "20220919_AdanaAdults",
  "20220919_AnkaraMinors",
  "20220919_AdanaMinors",
  "outpatient_istanbul",
  "outpatient_izmir",
  "outpatient_alanya",
  "20220919_SacroCuoreEmergency",
  "employees",
  "20220919_Verona",
  "20220919_ISARIC",
  "20220919_TUDublin",
  "Romania",
  "colombia_all",
  "20220919_INANTRO",
  "20220919_UNSAInpatient",
  "20220919_UZA",
  "20220919_ULSS6",
  "20220919_ASPEUR"
)

urls <- c(
  "https://192.168.1.200:8001",
  "https://192.168.1.200:8002",
  "https://192.168.1.200:8003",
  "https://192.168.1.200:8006",
  "https://192.168.1.50:9002",
  "https://192.168.1.102",
  "https://uncover.itg.be",
  "https://uncover.itg.be",
  "https://192.168.1.50:9001",
  "https://192.168.1.200:8004",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.101:8443",
  "https://192.168.1.50:8890",
  "https://192.168.1.50:8890",
  "https://192.168.1.50:8890",
  "https://192.168.1.50:8890",
  "https://uncover.itg.be",
  "https://192.168.1.200:8005",
  "https://fenfisdi.udea.edu.co/opal",
  "https://192.168.1.200:8007",
  "https://192.168.1.200:8008",
  "https://uncover.itg.be",
  "https://opal.aulss6.veneto.it",
  "https://uncover.itg.be"
)
# 
users <- c(
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "emertens",
  "emertens",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "emertens",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "user_analisis",
  "emertens",
  "user_analisis",
  "emertens"
)

pass <- c(
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "3^z4AV.)hG5~PT/]",
  "3^z4AV.)hG5~PT/]",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "3^z4AV.)hG5~PT/]",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "Ekfl07UUgz",
  "3^z4AV.)hG5~PT/]",
  "7yuvFnCTrPxPDt8@",
  "3^z4AV.)hG5~PT/]"
)