R中的“条件满足时运行脚本部分”

Question

我目前正在使用R来运行MCMCglmm并且有一段很长的脚本（很多行）需要花费相当长的时间（~5天）才能运行。我保存输出并重新加载它，同时将整个部分设置为注释（通过在每行的开头添加＃），但是将来我需要调整一些东西并重新运行链。目前，如果我想这样做，我必须去除所有这些＃，运行脚本，并在链完成后替换它们。是否有一个函数，我可以将我偶尔使用的脚本包装成打开或关闭那段代码？有点像这样：

run_chains = "yes" # type yes or no
run_script(if run_chains = "yes", run the following section of code:
chain = MCMCglmm ....
.... MCMCglmm code ....
.... more MCMCglmm code ....
, else ignore this section of code)

Answer 1

@JoshuaUlrich将解决方案作为评论发布 - 关键是if(){}else(){}

run = "yes"
if(run=="yes"){
print("A")
}else{
print("B")
}

> run = "yes"
> if(run=="yes"){
+ print("A")
+ }else{
+ print("B")
+ }
[1] "A"
> 
> run = "no"
> if(run=="yes"){
+ print("A")
+ }else{
+ print("B")
+ }
[1] "B"
> 

请注意，else{}可以留空以执行任何操作。