Browse Source

Eliminar BDpath. No funciona.

main
Costa 2 years ago
parent
commit
04efc55fd2
2 changed files with 4 additions and 4 deletions
  1. +0
    -3
      R/BDpath.R
  2. +4
    -1
      R/sqlFile.R

+ 0
- 3
R/BDpath.R

@ -1,3 +0,0 @@
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"

+ 4
- 1
R/sqlFile.R

@ -1,5 +1,8 @@
sqlFile<-function(file=1, list=F){
source(paste0(.libPaths(),"/BDCIT/R/BDpath.R"), encoding = "UTF-8")
# 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{

Loading…
Cancel
Save