Funciones para la interacción de bases de datos del grupo CIT.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

11 lines
483 B

sqlFile<-function(file=1, list=F){
# source(paste0(.libPaths(),"/BDCIT/R/BDpath.R"), encoding = "UTF-8")
sqlFiles<-list()
sqlFiles[[1]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/OVARIO.accdb"
sqlFiles[[2]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/MELANOMA UVEAL CIT.accdb"
if (list){
print(sqlFiles)
}else{
return(sqlFiles[[file]])
}
}