Как предотвратить включение кода источника() R более одного раза?

Question

У меня есть много исходных файлов R. Например, в файлах A.R и C.RB.R загружается через source(). Теперь я хотел бы использовать функции как в A.R, так и в C.R, как я могу избежать поиска B.R? Есть ли какие-либо механизмы защиты, подобные в C/C++?

Answer 1

Если у B.R уже есть функция или набор данных в ней с довольно уникальным именем, вы можете использовать его в качестве охранника. В противном случае, просто определить одно:

BR

B_is_loaded <- TRUE 
# The normal B stuff 

AR:

if(!exists("B_is_loaded")) source("B.R") 
# Now you can call the stuff in B