3

我有一个 R 脚本,它采用 R 的其他脚本并以这种方式操作它们,并且还执行它们的代码。我的脚本使用了一些变量(显然),而当其他脚本使用通用变量名时,我就陷入了混乱。我希望我可以像在胶囊中一样执行其他脚本,这样重合的变量就不会相互影响。

我一直在阅读有关环境的内容,并进行了很多尝试,但我没有理解它们的真正含义。

例子:

script1.txt
___________
i=sample(10:20,1)

script2.txt
___________
i=sample(10:20,1) 

myscript.txt
___________
other.script = c("script1.txt", "script2.txt")
for( i in 1:2 ) {
    source(other.script[i])
}
i==2

我希望每个变量“i”都能在不影响其他变量的情况下完成其职责(特别是 myscript 中的变量,我不太关心其他变量)。

4

2 回答 2

6

您正在寻找sys.source. 您走在正确的轨道上,您需要创建一个environment然后在该环境中运行脚本。

other.script = c("script1.txt", "script2.txt")
for( i in 1:2 ) {
  env<-new.env(parent = baseenv())
  sys.source(other.script[i],env)
  print(get('i',env)) # prints the value of i
}
i==2 # TRUE
于 2012-10-05T17:56:15.713 回答
6

处理这个问题的最好方法是创建一组函数来分割脚本捕获的功能。每个函数都在自己的环境中执行,防止变量相互干扰。理想情况下,函数不应该太长,比如 10-20 行或代码。比调用这些函数完成任务更大的脚本。如果您正确地执行此操作,您的脚本可能会简短且切中要害。我通常将这些函数存储在一个或多个脚本文件中,以供source需要它们的脚本编辑。您甚至可以将它们包装在一个包裹中。

您想要订购脚本的方式,所有变量都是全局的,即可以在整个程序中访问。一般来说,应该像瘟疫一样避免使用全局变量。这正是因为您的问题关注的是:我如何防止变量相互干扰。就像我说的,抽象成函数或对象是防止这种情况发生的方法。有关全局变量等的更多信息,请参见:

于 2012-10-05T17:57:24.550 回答