我有一些具有搜索数据库功能的R文件。 当我导入文件时,最后一个文件看起来像是与前一个文件重叠,因此无法访问前一个文件的功能。 我该如何解决这个问题?
我已经进行了测试
source ("data / fileA.R")
source ("data / fileB.R")
在ui.R
,server.R
文件中,并尝试使用global.R
。
我尝试过的所有方法始终仅加载最后上传的文件中的功能,在本例中为fileB.R
。
如果我用fileA.R
进行了反转,则只能访问fileB.R
函数。
source ("data / fileB.R")
source ("data / fileA.R")
我也尝试过使用
导入sapply (paste0 ("data /", list.files ("data /")), source)
在其他情况下,我只能访问文件的功能
fileA.R
getDados <- function(){
query <- paste0("
SELECT col1
FROM table_A
", sep= "")
df <- get_query(dbDriver_PostgreSQL, query)
return(df)
}
fileB.R
getDadosB <- function(){
query <- paste0("
SELECT col1
FROM table_A
", sep= "")
df <- get_query(dbDriver_PostgreSQL, query)
return(df)
}